Apple-2-Tools/dmolony-DiskBrowser
1
0
Fork 0
mirror of https://github.com/dmolony/DiskBrowser.git synced 2024-06-26 17:29:50 +00:00
Code Issues Projects Releases Wiki Activity

don't include goto, gosub, on

Browse Source
This commit is contained in:
Denis Molony 2021-01-05 13:42:59 +10:00
parent d801e85736
commit 6e70142f59
1 changed files with 10 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/com/bytezone/diskbrowser/applefile/SubLine.java
View File

@ -43,7 +43,10 @@ public class SubLine
if (Utility.isHighBitSet (firstByte)) if (Utility.isHighBitSet (firstByte))
doToken (firstByte); doToken (firstByte);
else if (Utility.isDigit (firstByte)) else if (Utility.isDigit (firstByte))
{
doDigit (); doDigit ();
return;
}
else else
doAlpha (); doAlpha ();
@ -137,8 +140,13 @@ public class SubLine
if (!Utility.isLetter ((byte) var.charAt (0))) if (!Utility.isLetter ((byte) var.charAt (0)))
{ {
if (!constants.contains (var)) if (is (ApplesoftConstants.TOKEN_GOTO) || is (ApplesoftConstants.TOKEN_GOSUB)
constants.add (Integer.parseInt (var)); || is (ApplesoftConstants.TOKEN_ON))
return;
int varInt = Integer.parseInt (var);
if (!constants.contains (varInt))
constants.add (varInt);
return; return;
} }