Changeset 2958 for src/Pugs/Compile.hs
- Timestamp:
- 05/11/05 02:34:32 (4 years ago)
- svk:copy_cache_prev:
- 4536
- Files:
-
- 1 modified
-
src/Pugs/Compile.hs (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
src/Pugs/Compile.hs
r2725 r2958 14 14 import Pugs.Internals 15 15 import Pugs.Compile.Pugs (genPugs) 16 import Pugs.Compile.Parrot (gen IMC)16 import Pugs.Compile.Parrot (genPIR) 17 17 import Pugs.Compile.Haskell (genGHC) 18 18 … … 20 20 compile "Haskell" env = fmap vCast $ runEvalIO env genGHC 21 21 compile "Pugs" env = fmap vCast $ runEvalIO env genPugs 22 compile "Parrot" env = fmap vCast $ runEvalIO env gen IMC22 compile "Parrot" env = fmap vCast $ runEvalIO env genPIR 23 23 compile s _ = fail $ "Cannot compile to " ++ s 24 24
