Changeset 9009 for src/Pugs/CodeGen/YAML.hs

Timestamp:

02/15/06 16:10:35 (3 years ago)

Author:

audreyt

Message:

* Prelude-YAML compilation works:

time ./pugs -CParse-YAML src/perl6/Prelude.pm > Prelude.yml

takes 12 seconds on my laptop, resulting in a 533036-bytes
file which we may or may not want to install as part of pugs's lib.
on the other hand, it's 16k when gzipped, and 8k when bzipped.

Files:

• src/Pugs/CodeGen/YAML.hs (modified) (1 diff)

src/Pugs/CodeGen/YAML.hs

@@ -11 +11 @@
 genParseYAML :: Eval Val
 genParseYAML = do
-    -- glob    <- asks envGlobal
+    glob    <- asks envGlobal
     main    <- asks envBody
-    yaml    <- liftIO (showYaml main)
+    yaml    <- liftIO (showYaml (glob, main))
     return (VStr yaml)