basic: read ^2 as two separate tokens

Extending the previous line triggers 'LINE TOO LONG'.

impls/basic/reader.in.bas

@@ -9,6 +9,7 @@ READ_TOKEN:
   IF C$=";" THEN GOSUB SKIP_TO_EOL:GOTO READ_TOKEN
   T$=C$
   IF T$="(" OR T$=")" OR T$="[" OR T$="]" OR T$="{" OR T$="}" OR T$="'" OR T$="`" OR T$="@" THEN RETURN
+  IF T$="^" THEN RETURN
   GOSUB PEEK_CHAR: REM peek at next character
   IF T$="~" AND C$<>"@" THEN RETURN
   S1=0:S2=0: REM S1: INSTRING?, S2: ESCAPED?