for-next repeats forever because of data type limit

[programandala.net]

I'll check what FreeBASIC does in such cases.

Please, do, since I'm trying to get close to FreeBasic as much as possible (preserving most of ZX BASIC on the other side ;-))

I modified the code to check it with FreeBASIC, and it works exactly the same way: the 0-255 loop repeats forever when the index variable is ubyte:

Code:

' FreeBASIC ' The following loop works as expected: cls print "Press q to quit" dim b0 as ubyte for b0=0 TO 254 locate 2 print "b0=";b0;" " next b0 ' The following loop works as expected too: dim b1 as uinteger for b1=0 TO 255 locate 3 print "b1=";b1;" " next b1 ' But the following loop starts again forever: dim b2 as ubyte for b2=0 TO 255 locate 4 print "b2=";b2;" " if inkey="q" then end endif next b2 print "This message never will be printed" sleep

By the way, the compatibility with FreeBASIC would be great: for certain programs, one source code could be compiled both for the ZX Spectrum and for other platforms --to some extent, with some conditional compilation. I'm starting working on some projects with FreeBASIC and ZX Basic, so I'll have the chance to explore the issue.