Update of /cvsroot/wisp/wisp/users/dig
In directory sc8-pr-cvs1:/tmp/cvs-serv10188
Modified Files:
pe.py
Log Message:
avoid usage of interpret_single
Index: pe.py
===================================================================
RCS file: /cvsroot/wisp/wisp/users/dig/pe.py,v
retrieving revision 1.33
retrieving revision 1.34
diff -u -d -r1.33 -r1.34
--- pe.py 21 May 2003 13:23:10 -0000 1.33
+++ pe.py 22 May 2003 19:27:24 -0000 1.34
@@ -8,7 +8,7 @@
from coff import *
import time
-from tran import Interpreter, interpret_single
+from tran import Interpreter
def roundup (value, boundary):
return (value + boundary - 1) & ~(boundary - 1)
@@ -29,7 +29,10 @@
raise 'MZ message may not contain dollar signs', message
if message.find('\r') == -1: # if no CRs, insert them
message = '\r\n'.join(message.split('\n'))
- b = interpret_single('make-pe-mz-stub-structure', '<', include = 'pe')
+ b = Linkie('<')
+ do = Interpreter(b).do
+ do('needs pe')
+ do('make-pe-mz-stub-structure')
message += '$' # Dollar the Terminator
# a pointer to the PE signature must appear at the offset 0x003C
|