Author: coke
Date: Tue Oct 11 19:11:40 2005
New Revision: 9464
Modified:
trunk/languages/BASIC/interpreter/basic.pl
Log:
Minor fix (predeclare some globals) that allows the interpreter to at
least partially work again.
Modified: trunk/languages/BASIC/interpreter/basic.pl
==============================================================================
--- trunk/languages/BASIC/interpreter/basic.pl (original)
+++ trunk/languages/BASIC/interpreter/basic.pl Tue Oct 11 19:11:40 2005
@@ -41,6 +41,9 @@ print T <<'EOF';
MAIN:
new P20, .PerlHash # PerlHash # Numerics
new P21, .PerlHash # Alphabetics.
+ new P22, .PerlHash # ??
+ new P23, .PerlHash # ??
+ new P24, .PerlArray # Line numbers
time I24 # Seed the random number generator
save 0 # Initialize the runtime stack!