Weird DEFB bug (*solved*)

[einar]

Try running this program:

Code:

GO TO 10

sample:
    asm
       defb "A(B)CD"
    end asm

10  DIM a,i AS UBYTE
    FOR i = 0 TO 5
    LET a=PEEK(@sample+i)
    PRINT a;" '";CHR$(a);"'"
    NEXT i

It was supposed to produce this output:

Code:

65 'A'
40 '('
66 'B'
41 ')'
67 'C'
68 'D'

However it will produce this output instead:

Code:

65 'A'
32 ' '
40 '('
66 'B'
41 ')'
67 'C'

Apparently this extra space (code 32) mysteriously appears whenever there's parenthesis inside a defb string.

Tested using latest version 1.4.0s1902. This problem always happens regardless of optimization level for compilation.

[boriel]

Confirmed bug. hock:
And I'm puzzled, because I though it was in the preprocessor. It is not.

[boriel]

Confirmed bug. hock:
And I'm puzzled, because I though it was in the preprocessor. It is not.

Ok. It seems fixed now, but please, check even your old programs to see if they works ok.
It was a bug in an bizarre code in the optimizer I need to refact (as always).

Please, can you download ZX BASIC 1.4.0-r1912 and tell me if it works ok? :roll:

[einar]

It works now, thanks!!!