[Wisp-cvs] wisp/users/dig make-pe-exe.py,1.17,1.18

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

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

Modified Files:
	make-pe-exe.py 
Log Message:
use new, clearer syntax

Index: make-pe-exe.py
===================================================================
RCS file: /cvsroot/wisp/wisp/users/dig/make-pe-exe.py,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -d -r1.17 -r1.18
--- make-pe-exe.py	5 May 2003 21:06:40 -0000	1.17
+++ make-pe-exe.py	6 May 2003 16:27:28 -0000	1.18
@@ -24,8 +24,7 @@
     b = Linkie('<')
     b.set_origin(0x100)
     b.emit_string('MZ') # 'MZ'
-    b.emit_wyde_sum(['#mz/bytes-in-last-block'])
-    b.emit_wyde_sum(['#mz/blocks-in-file'])
+    b[::2] = '#mz/bytes-in-last-block', '#mz/blocks-in-file'
     b.emit_wyde(0) # no relocation
     b.emit_wyde(0) # empty MZ header--load it all into memory
     b.emit_wyde(0x40) # low memory limit in paragraphs