Changeset 15374 for src/Pugs/AST.hs

Timestamp:

02/28/07 00:25:27 (21 months ago)

Author:

audreyt

Message:

* Adapt existing newVal implementation in Pugs.Val to MO.

A "Val" is now simply an invocant within the Eval monad.

Files:

• src/Pugs/AST.hs (modified) (1 diff)

src/Pugs/AST.hs

@@ -39 +39 @@
 import Pugs.AST.SIO
 import Pugs.AST.Pad
-import Pugs.Val (val, castVal, formatVal, PureBit, PureBool, PureStr, PureInt, PureNum, Capt(..), ValCapt, Feed(..), ValFeed, emptyFeed, Sig(..), SigParam(..), ParamAccess(..), ParamDefault(..))
+import Pugs.Val hiding (Val, Param, listVal) -- (val, castVal, formatVal, PureBit, PureBool, PureStr, PureInt, PureNum, Capt(..), ValCapt, Feed(..), ValFeed, emptyFeed, Sig(..), SigParam(..), ParamAccess(..), ParamDefault(..))
 
 {-|