https://bugs.documentfoundation.org/show_bug.cgi?id=146873

            Bug ID: 146873
           Summary: Macro: bug in CoreReflection after Split() + arrayed(
                    Array() )
           Product: LibreOffice
           Version: 7.4.0.0 alpha0+ Master
          Hardware: x86-64 (AMD64)
                OS: Windows (All)
            Status: UNCONFIRMED
          Severity: normal
          Priority: medium
         Component: BASIC
          Assignee: [email protected]
          Reporter: [email protected]

Created attachment 177671
  --> https://bugs.documentfoundation.org/attachment.cgi?id=177671&action=edit
OK in Watch, but error in CoreReflection

If I transform the Array() created by Split() to the Array( Array() ), then it
shows Error for CoreReflection. 
But if the Array() is created by definition =Array(...), then it is OK. 
Run this macro:

Sub bugInSplitArrayArray
        dim p(), i%, s$, oReflection as object, o as object
        s="a-b-c"
        p=Split(s, "-") 'BUG, it shows error
        'p=Array("a", "b", "c") 'but for this Array it is OK
        for i=lbound(p) to ubound(p)
                p(i)=Array( p(i) )
        next i
        oReflection=CreateUnoService("com.sun.star.reflection.CoreReflection")
        o=oReflection.getType(p) 'Error
        msgbox o.TypeClass 'if OK it shows 20
End Sub

bug:
Version: 7.4.0.0.alpha0+ (x64) / LibreOffice Community
Build ID: 151c56ed547490a99d912524c0e56b5d6d4a1939
CPU threads: 8; OS: Windows 10.0 Build 17763; UI render: Skia/Raster; VCL: win
Locale: cs-CZ (cs_CZ); UI: en-US
Calc: CL

but for example OK in 7.0.4.2:
Version: 7.0.4.2 (x64)
Build ID: dcf040e67528d9187c66b2379df5ea4407429775
CPU threads: 2; OS: Windows 6.1 Service Pack 1 Build 7601; UI render:
Skia/Raster; VCL: win
Locale: cs-CZ (cs_CZ); UI: cs-CZ
Calc: CL

-- 
You are receiving this mail because:
You are the assignee for the bug.

Reply via email to