Changeset 8153 for src/Pugs/Compile/Haskell.hs

Timestamp:

12/10/05 13:24:15 (3 years ago)

Author:

gaal

Message:

* Refactor Cxt, Pos, and Prag nodes in Exp to a unified Ann

(for Annotation) type. This should ease work on lexical pragmas.

Files:

• src/Pugs/Compile/Haskell.hs (modified) (1 diff)

src/Pugs/Compile/Haskell.hs

@@ -65 +65 @@
     argC1 = compile arg1
     argC2 = compile arg2
-compile (Cxt _ arg) = compile arg
-compile (Pos _ arg) = compile arg
+compile (Ann _ arg) = compile arg
 compile (Val (VInt i)) = [| return (VInt i) |]
 compile (Val (VStr s)) = [| return (VStr s) |]