Update of /cvsroot/wisp/wisp/users/dig
In directory sc8-pr-cvs1:/tmp/cvs-serv31379
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.18
retrieving revision 1.19
diff -u -d -r1.18 -r1.19
--- make-pe-exe.py 6 May 2003 16:27:28 -0000 1.18
+++ make-pe-exe.py 6 May 2003 16:35:54 -0000 1.19
@@ -25,13 +25,11 @@
b.set_origin(0x100)
b.emit_string('MZ') # 'MZ'
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
- b.emit_wyde(0x40) # high memory limit in paragraphs
- b.emit_wyde(-0x10) # initial SS
- b.emit_wyde(0x100) # initial SP in PSP
- b.emit_wyde(0) # no checksum
+ b[::2] = 0 # no relocation
+ b[::2] = 0 # empty MZ header--load it all into memory
+ b[::2] = 0x40, 0x40 # low and high memory limits in paragraphs
+ b[::2] = -0x10, 0x100 # initial SS, SP
+ b[::2] = 0 # no checksum
b.emit_wyde_sum(['&mz/_start']) # initial IP
b.emit_wyde(-0x10) # initial CS
b.emit_wyde(0) # relocation table offset
|
