Comment out compilation unit stuff for now

db4
Slava Pestov 2008-03-18 01:26:30 -05:00
parent 296a20767f
commit 6e7556242b
1 changed files with 4 additions and 4 deletions

View File

@ -316,10 +316,10 @@ SYMBOL: deserialized
deserialize* [ "End of stream" throw ] unless ;
: deserialize ( -- obj )
[
V{ } clone deserialized
[ (deserialize) ] with-variable
] with-compilation-unit ;
! [
V{ } clone deserialized
[ (deserialize) ] with-variable ;
! ] with-compilation-unit ;
: serialize ( obj -- )
H{ } clone serialized [ (serialize) ] with-variable ;