Update of /cvsroot/wisp/wisp/users/dig
In directory sc8-pr-cvs1:/tmp/cvs-serv22360
Modified Files:
tran.py
Log Message:
minor cleanup
Index: tran.py
===================================================================
RCS file: /cvsroot/wisp/wisp/users/dig/tran.py,v
retrieving revision 1.54
retrieving revision 1.55
diff -u -d -r1.54 -r1.55
--- tran.py 22 Apr 2003 15:27:40 -0000 1.54
+++ tran.py 22 Apr 2003 15:30:55 -0000 1.55
@@ -326,13 +326,6 @@
prep.push_file(fn)
else: raise 'Unknown meaning type in', `Meaning[tok]`
else: raise 'bad token', tok
-def state_record (tok):
- global State, current_recordee
- if tok == Semicolon:
- State = state_outer
- current_recordee = None
- else:
- current_recordee.append(tok)
def state_regs (tok):
global State, current_register_family, current_register_index
if tok != Semicolon:
@@ -398,6 +391,13 @@
newmac = []
Meaning[name] = ('macro', newmac)
current_recordee = newmac
+ def state_record (tok):
+ global current_recordee, State
+ if tok == Semicolon:
+ State = state_outer
+ current_recordee = None
+ else:
+ current_recordee.append(tok)
State = state_record
:regs|family
|
