Tokenizer in QB64

[bplus]

Well ZXDunny found the problem and Paul Doe had smarter check on ch$
so I would rewrite the wrapper like this;

Code: (Select All)

Function asc2& (ch$) ' if you just don't know what ch$ might be
    If Len(ch$) Then asc2& = Asc(ch$)
End Function

otherwise asc2&() returns 0 instead of shutting down the Run with an error.