[Wisp-cvs] wisp/users/dig tran.py,1.56,1.57

[<di...@us...>]

Update of /cvsroot/wisp/wisp/users/dig
In directory sc8-pr-cvs1:/tmp/cvs-serv23690

Modified Files:
	tran.py 
Log Message:
minor cleanup

Index: tran.py
===================================================================
RCS file: /cvsroot/wisp/wisp/users/dig/tran.py,v
retrieving revision 1.56
retrieving revision 1.57
diff -u -d -r1.56 -r1.57
--- tran.py	22 Apr 2003 15:32:07 -0000	1.56
+++ tran.py	22 Apr 2003 15:33:15 -0000	1.57
@@ -231,7 +231,6 @@
                 res += '- ' + `-this.scalar`
         return res
 
-def align (n): cursect.align(n)
 def minor (reg):
     Regstack.append(Integer_Literal(reg[-1]))
 def plus (a, b):
@@ -351,7 +350,6 @@
 Meaning = {
     '+ const const': ('builtin', plus,        2),
     '- const const': ('builtin', minus,       2),
-    'align int':     ('builtin', align,       1),
     'any':           ('simple',  Class_Marker('any')),
     'const':         ('simple',  Class_Marker('const')),
     'include':       ('include',),
@@ -405,6 +403,9 @@
     Registers[f] = family
     current_register_index = 0
     State = state_regs
+
+align int
+    cursect.align(long(Regstack.pop()))
 
 b, int
     cursect.emit_byte(long(Regstack.pop()) % 0x100)