Changeset 12476 for src/Pugs/Val

Timestamp:

08/19/06 21:04:11 (2 years ago)

Author:

audreyt

Message:

* Pugs.Val.Code: luqui++ noticed I made a typo and forgot

the Nothing case for ParamDefault? in newland Code.

Files:

• src/Pugs/Val/Code.hs (modified) (1 diff)

src/Pugs/Val/Code.hs

@@ -117 +117 @@
     deriving (Typeable)
 
-newtype ParamDefault = MkParamDefault Exp
+data ParamDefault
+    = DNil | DExp Exp
     deriving (Typeable)