sc/qa/extras/vba-macro-test.cxx |    9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

New commits:
commit a1ac293aae7d898190733e55512cc30afef05599
Author:     Caolán McNamara <caol...@redhat.com>
AuthorDate: Fri Feb 4 17:04:08 2022 +0000
Commit:     Caolán McNamara <caol...@redhat.com>
CommitDate: Sun Feb 6 13:21:05 2022 +0100

    intermittent CppunitTest_sc_macros_test failure
    
    seen as:
    
    
C:/cygwin/home/tdf/lode/jenkins/workspace/gerrit_windows/sc/qa/extras/vba-macro-test.cxx(596)
 : error : Assertion
    Test name: VBAMacroTest::testVba
    equality assertion failed
    - Expected: OK
    - Actual  : Test Results
    ============
    
     Failed:  : Test change event for Range.Clear set:
     Failed:  : Test change event for Range.ClearContents set:
     Failed:  : Test change event for Range.Replace:
     Failed:  : Test change event for Range.FillRight:
    Tests passed: 4
    Tests failed: 4
    
    - script reported failure in file Ranges-3.xls
    
    Failures !!!
    Run: 39   Failure total: 1   Failures: 1   Errors: 0
    
    try this alternative to see if it makes a difference
    
    Change-Id: Id4675635e5740fdd9e4b199b603223a95a379960
    Reviewed-on: https://gerrit.libreoffice.org/c/core/+/129501
    Tested-by: Jenkins
    Reviewed-by: Caolán McNamara <caol...@redhat.com>

diff --git a/sc/qa/extras/vba-macro-test.cxx b/sc/qa/extras/vba-macro-test.cxx
index 33a003e19db2..a611e9f5cc08 100644
--- a/sc/qa/extras/vba-macro-test.cxx
+++ b/sc/qa/extras/vba-macro-test.cxx
@@ -11,6 +11,7 @@
 #include <test/unoapi_test.hxx>
 #include <osl/file.hxx>
 #include <sal/log.hxx>
+#include <vcl/scheduler.hxx>
 #include <vcl/svapp.hxx>
 #include <viewdata.hxx>
 #include <tabvwsh.hxx>
@@ -564,10 +565,10 @@ void VBAMacroTest::testVba()
         uno::Reference<css::lang::XComponent> xComponent
             = loadFromDesktop(aFileName, 
"com.sun.star.sheet.SpreadsheetDocument");
 
-        // process all events such as OnLoad events etc.
-        // otherwise they tend to arrive later at a random
-        // time - while processing other StarBasic methods.
-        Application::Reschedule(true);
+        // process all events such as OnLoad events etc.  otherwise they tend
+        // to arrive later at a random time - while processing other StarBasic
+        // methods.
+        Scheduler::ProcessEventsToIdle();
 
         uno::Any aRet;
         uno::Sequence<sal_Int16> aOutParamIndex;

Reply via email to