[Bug 58248] New: Me(Idx) fails to compile

[WineHQ Bugzilla]

http://bugs.winehq.org/show_bug.cgi?id=58248

Bug ID: 58248
           Summary: Me(Idx) fails to compile
           Product: Wine
           Version: 10.4
          Hardware: x86-64
                OS: Linux
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: vbscript
          Assignee: [e-mail]
          Reporter: [e-mail]
      Distribution: ---

code:

Sub Spinner_Hit(Idx)
  Me(Idx).IsDropped=True
  'Spinner(Idx).IsDropped=True
End Sub

Wine:

/opt/wine-devel/bin/wine cscript test.vbs

0134:fixme:vbscript:make_call_expression Unhandled for expr type 22
0134:fixme:wscript:ActiveScriptSite_OnScriptError ()
0134:fixme:wscript:run_script ParseScriptText failed: 80004005

Windows:

[Running] cscript //Nologo "c:\Users\me\OneDrive\Bureaublad\test.vbs"

[Done] exited with code=0 in 0.097 seconds

[Bug 58248] vbscript: Me(Idx) fails to compile

[WineHQ Bugzilla]

http://bugs.winehq.org/show_bug.cgi?id=58248

francisdb  changed:

What    |Removed                     |Added
----------------------------------------------------------------------------
            Summary|Me(Idx) fails to compile    |vbscript: Me(Idx) fails to
                   |                            |compile

[Bug 58248] vbscript: Me(Idx) fails to compile

[WineHQ Bugzilla]

http://bugs.winehq.org/show_bug.cgi?id=58248

--- Comment #1 from Nikolay Sivov  ---
Hi,

Is that a complete vbs source file? My understanding is that 'Me' is similar to
'this' in cpp, but what Me(Idx) would mean I have no idea.

[Bug 58248] vbscript: Me(Idx) fails to compile

[WineHQ Bugzilla]

http://bugs.winehq.org/show_bug.cgi?id=58248

--- Comment #2 from Nikolay Sivov  ---
make_call_expression() error message means that it doesn't expect call syntax
on 'ME' expression.

[Bug 58248] vbscript: Me(Idx) fails to compile

[WineHQ Bugzilla]

http://bugs.winehq.org/show_bug.cgi?id=58248

--- Comment #3 from francisdb  ---
This is calling the default property / function / sub?

class TestClass
    Public Default Property Get Item(Index)
        wscript.echo "Item" & Index
        Item = 40 + Index
    End Property

Public sub Test ()
        wscript.echo "Test" & Me(2)
    End Sub
End Class

Dim obj
Set obj = New TestClass
obj.Test

[Running] cscript //Nologo
"c:\Users\me\OneDrive\Bureaublad\tempCodeRunnerFile.vbs"
Item2
Test42

[Done] exited with code=0 in 0.088 seconds

[Bug 58248] vbscript: Me(Idx) fails to compile

[WineHQ Bugzilla]

http://bugs.winehq.org/show_bug.cgi?id=58248

--- Comment #4 from Nikolay Sivov  ---
I see, that probably means it's about supporting default properties with
arguments.

[Bug 58248] vbscript: Me(Idx) fails to compile

[WineHQ Bugzilla]

http://bugs.winehq.org/show_bug.cgi?id=58248

Ken Sharp  changed:

What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |download, source, testcase