[Bug 27831] Tic Tac Toe Game (vbscript) cannot be played (colon used for placing multiple statements on the same line in select case statements)

https://bugs.winehq.org/show_bug.cgi?id=27831

Anastasius Focht  changed:

What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |[e-mail]
          Component|-unknown                    |vbscript
            Summary|Tic Tac Toe Game (vbscript) |Tic Tac Toe Game (vbscript)
                   |cannot be played            |cannot be played (colon
                   |                            |used for placing multiple
                   |                            |statements on the same line
                   |                            |in select case statements)

--- Comment #4 from Anastasius Focht  ---
Hello folks,

confirming, still present.

--- snip ---
$ wine iexplore file:///c:/Game.htm
...
0009:fixme:vbscript:parse_script parser failed around L"lect case c\n\tcase
4:i=2 'Center\n\tcase 0,2,6,8:i=1 'Corner\n\tcase else:i=0 'Other\n\tend
select\n\tCellType=i\nEnd Function\n\nFunction CheckForWin(p)\n\t'p: player
index\n\t'check if player p can win the game in next move,\n\t'return that cell
if he can, and -1 if not.\n\t'if player p have wone "...
0009:trace:vbscript:VBScriptParseProcedure_ParseProcedureText
(0x1e134e8)->(L"CellClick(0)" (null) L"" (null) (nil) L""" 0 0 380 0x33f2f4)
...
--- snip ---

Wine's VBScript parser fails on the use of colon in 'select case' to place
several statements on the same line (colon is an end of statement token).

Example script code, extracted from html:

--- snip ---
Function CellType(c)
    'return 0,1 or 2  as cell position:
    '2=Center cell  ,  1=Corner cell  and  0=other cells
    dim i
    select case c
    case 4:i=2 'Center
    case 0,2,6,8:i=1 'Corner
    case else:i=0 'Other
    end select
    CellType=i
End Function
--- snip ---

$ sha1sum Tic_Tac_To164186962003.zip 
f8790fd7eb0365bd4b686eb5e48baaf844026253  Tic_Tac_To164186962003.zip

$ du -sh Tic_Tac_To164186962003.zip 
8.0K    Tic_Tac_To164186962003.zip

$ wine --version
wine-1.7.14

Regards