Changeset 13863 for src/Pugs/Compile
- Timestamp:
- 10/04/06 15:43:40 (2 years ago)
- Location:
- src/Pugs/Compile
- Files:
-
- 2 modified
Legend:
- Unmodified
- Added
- Removed
-
src/Pugs/Compile/PIL2.hs
r13594 r13863 397 397 compile (Syn "rx" [exp, _]) = compile exp -- XXX WRONG - use PCRE 398 398 compile (Syn "subst" [exp, _, _]) = compile exp -- XXX WRONG - use PCRE 399 compile (Syn "|" [exp]) = compile exp -- XXX WRONG 400 compile (Syn "|<<" [exp]) = compile exp -- XXX WRONG 399 401 compile exp@(App _ _ _) = fmap PExp $ compile exp 400 402 compile exp@(Syn _ _) = fmap PExp $ compile exp -
src/Pugs/Compile/Pugs.hs
r13448 r13863 5 5 import Pugs.Types 6 6 import Pugs.Internals 7 import qualified Data.ByteString.Char8 as Str7 import qualified UTF8 as Str 8 8 import qualified Data.Map as Map 9 9
