ext/ply/ply/lex.py: ext/ply/ply/yacc.py: ext/ply/CHANGES: ext/ply/README: ext/ply/TODO: ext/ply/doc/ply.html: ext/ply/example/ansic/clex.py: ext/ply/example/ansic/cparse.py: ext/ply/example/calc/calc.py: ext/ply/example/hedit/hedit.py: ext/ply/example/optcalc/calc.py: ext/ply/test/README: ext/ply/test/calclex.py: ext/ply/test/lex_doc1.exp: ext/ply/test/lex_doc1.py: ext/ply/test/lex_dup1.exp: ext/ply/test/lex_dup1.py: ext/ply/test/lex_dup2.exp: ext/ply/test/lex_dup2.py: ext/ply/test/lex_dup3.exp: ext/ply/test/lex_dup3.py: ext/ply/test/lex_empty.py: ext/ply/test/lex_error1.py: ext/ply/test/lex_error2.py: ext/ply/test/lex_error3.exp: ext/ply/test/lex_error3.py: ext/ply/test/lex_error4.exp: ext/ply/test/lex_error4.py: ext/ply/test/lex_hedit.exp: ext/ply/test/lex_hedit.py: ext/ply/test/lex_ignore.exp: ext/ply/test/lex_ignore.py: ext/ply/test/lex_re1.exp: ext/ply/test/lex_re1.py: ext/ply/test/lex_rule1.py: ext/ply/test/lex_token1.py: ext/ply/test/lex_token2.py: ext/ply/test/lex_token3.py: ext/ply/test/lex_token4.py: ext/ply/test/lex_token5.exp: ext/ply/test/lex_token5.py: ext/ply/test/yacc_badargs.exp: ext/ply/test/yacc_badargs.py: ext/ply/test/yacc_badprec.exp: ext/ply/test/yacc_badprec.py: ext/ply/test/yacc_badprec2.exp: ext/ply/test/yacc_badprec2.py: ext/ply/test/yacc_badrule.exp: ext/ply/test/yacc_badrule.py: ext/ply/test/yacc_badtok.exp: ext/ply/test/yacc_badtok.py: ext/ply/test/yacc_dup.exp: ext/ply/test/yacc_dup.py: ext/ply/test/yacc_error1.exp: ext/ply/test/yacc_error1.py: ext/ply/test/yacc_error2.exp: ext/ply/test/yacc_error2.py: ext/ply/test/yacc_error3.exp: ext/ply/test/yacc_error3.py: ext/ply/test/yacc_inf.exp: ext/ply/test/yacc_inf.py: ext/ply/test/yacc_missing1.exp: ext/ply/test/yacc_missing1.py: ext/ply/test/yacc_nodoc.exp: ext/ply/test/yacc_nodoc.py: ext/ply/test/yacc_noerror.exp: ext/ply/test/yacc_noerror.py: ext/ply/test/yacc_nop.exp: ext/ply/test/yacc_nop.py: ext/ply/test/yacc_notfunc.exp: ext/ply/test/yacc_notfunc.py: ext/ply/test/yacc_notok.exp: ext/ply/test/yacc_notok.py: ext/ply/test/yacc_rr.exp: ext/ply/test/yacc_rr.py: ext/ply/test/yacc_simple.exp: ext/ply/test/yacc_simple.py: ext/ply/test/yacc_sr.exp: ext/ply/test/yacc_sr.py: ext/ply/test/yacc_term1.exp: ext/ply/test/yacc_term1.py: ext/ply/test/yacc_unused.exp: ext/ply/test/yacc_unused.py: ext/ply/test/yacc_uprec.exp: ext/ply/test/yacc_uprec.py: Import patch ply.diff src/arch/isa_parser.py: everything is now within the ply package --HG-- rename : ext/ply/lex.py => ext/ply/ply/lex.py rename : ext/ply/yacc.py => ext/ply/ply/yacc.py extra : convert_revision : fca8deabd5c095bdeabd52a1f236ae1404ef106e
68 lines
1.4 KiB
Python
68 lines
1.4 KiB
Python
# An implementation of Dartmouth BASIC (1964)
|
|
#
|
|
|
|
import sys
|
|
sys.path.insert(0,"../..")
|
|
|
|
import basiclex
|
|
import basparse
|
|
import basinterp
|
|
|
|
# If a filename has been specified, we try to run it.
|
|
# If a runtime error occurs, we bail out and enter
|
|
# interactive mode below
|
|
if len(sys.argv) == 2:
|
|
data = open(sys.argv[1]).read()
|
|
prog = basparse.parse(data)
|
|
if not prog: raise SystemExit
|
|
b = basinterp.BasicInterpreter(prog)
|
|
try:
|
|
b.run()
|
|
raise SystemExit
|
|
except RuntimeError:
|
|
pass
|
|
|
|
else:
|
|
b = basinterp.BasicInterpreter({})
|
|
|
|
# Interactive mode. This incrementally adds/deletes statements
|
|
# from the program stored in the BasicInterpreter object. In
|
|
# addition, special commands 'NEW','LIST',and 'RUN' are added.
|
|
# Specifying a line number with no code deletes that line from
|
|
# the program.
|
|
|
|
while 1:
|
|
try:
|
|
line = raw_input("[BASIC] ")
|
|
except EOFError:
|
|
raise SystemExit
|
|
if not line: continue
|
|
line += "\n"
|
|
prog = basparse.parse(line)
|
|
if not prog: continue
|
|
|
|
keys = prog.keys()
|
|
if keys[0] > 0:
|
|
b.add_statements(prog)
|
|
else:
|
|
stat = prog[keys[0]]
|
|
if stat[0] == 'RUN':
|
|
try:
|
|
b.run()
|
|
except RuntimeError:
|
|
pass
|
|
elif stat[0] == 'LIST':
|
|
b.list()
|
|
elif stat[0] == 'BLANK':
|
|
b.del_line(stat[1])
|
|
elif stat[0] == 'NEW':
|
|
b.new()
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|