rename write-bytecode to zo-marshal

svn: r13974

original commit: 25e7978999
This commit is contained in:
Matthew Flatt 2009-03-06 00:48:08 +00:00
parent 9cc0f1b7cd
commit a724fe6a00

View File

@ -2,12 +2,12 @@
(require compiler/zo-parse
scheme/match)
(provide write-bytecode)
(provide zo-marshal)
;; Doesn't write as compactly as MzScheme, since list and pair sequences
;; are not compated, and symbols are not written in short form
(define (write-bytecode top)
(define (zo-marshal top)
(match top
[(struct compilation-top (max-let-depth prefix form))
(let ([encountered (make-hasheq)]