[Wisp-cvs] wisp/users/dig pe.py,1.20,1.21

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

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

Modified Files:
	pe.py 
Log Message:
tranified some more of make_pe_aout_header via Interpreter.do

Index: pe.py
===================================================================
RCS file: /cvsroot/wisp/wisp/users/dig/pe.py,v
retrieving revision 1.20
retrieving revision 1.21
diff -u -d -r1.20 -r1.21
--- pe.py	19 May 2003 12:57:20 -0000	1.20
+++ pe.py	19 May 2003 13:05:44 -0000	1.21
@@ -108,13 +108,13 @@
               ' #cert-table/size t,
               ' &base-rel-table ' #rva + t,
               ' #base-rel-table/size t,
+              ' &debug-data ' #rva + t,
+              ' #debug-data/size t,
+              ' &arch-specific ' #rva + t,
+              ' #arch-specific/size t,
+              ' &global-pointer ' #rva + t,
+              0 t,
               """)
-    h.emit_tetra_sum(['&debug-data', '#rva'])
-    h.emit_tetra_sum(['#debug-data/size'])
-    h.emit_tetra_sum(['&arch-specific', '#rva'])
-    h.emit_tetra_sum(['#arch-specific/size'])
-    h.emit_tetra_sum(['&global-pointer', '#rva'])
-    h.emit_tetra(0)
     h.emit_tetra_sum(['&tls', '#rva'])
     h.emit_tetra_sum(['#tls/size'])
     h.emit_tetra_sum(['&load-config-table', '#rva'])