[Wisp-cvs] wisp/users/dig linkie.py,1.29,1.30

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

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

Modified Files:
	linkie.py 
Log Message:
minor cleanup

Index: linkie.py
===================================================================
RCS file: /cvsroot/wisp/wisp/users/dig/linkie.py,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -d -r1.29 -r1.30
--- linkie.py	20 Apr 2003 18:11:52 -0000	1.29
+++ linkie.py	20 Apr 2003 18:17:02 -0000	1.30
@@ -79,11 +79,15 @@
     def _emit_sum (this, size, addends, delta = 0, relative = 0):
         # If /relative/ is given, so many first components are PC-relative.
         # /relative/ must be smaller than or equal to len(addends).
+        # (Note: these must be symbols.  PC-relativeness does not work
+        # for integer literals.)
         if this._skipped <> 0: raise "Events out of order", this
         if relative > len(addends):
             raise 'Too many relatives', (addends, relative)
         for a in addends:
-            if relative: s = -size; relative -= 1
+            if relative:
+                s = -size; relative -= 1
+                if type(a) != StringType: raise 'relative non-symbol?', a
             else: s = size
             if type(a) == IntType: # local reference
                 if this._locals[a] <> None: # backwards