Changeset 12000 for src/Pugs/Val

Timestamp:

08/08/06 16:45:22 (2 years ago)

Author:

gaal

Message:

* New naming convention gives "I" prefix to general interfaces.

For now, this is used only in IValue and ICoercible.

* Maybe use "A" for ASTish typeclasses (e.g. APure instead of IPure)?

Files:

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

src/Pugs/Val/Str.hs

@@ -11 +11 @@
     deriving (Typeable, Show, Eq, Ord, Data, (:>:) String, (:<:) String, (:>:) ByteString, (:<:) ByteString)
 
-instance Coercible P PureStr where
+instance ICoercible P PureStr where
     asStr  = return . cast
 
-class (Monad m, Functor m, Eq a, Data a, Typeable a) => Coercible m a | a -> m where
+class (Monad m, Functor m, Eq a, Data a, Typeable a) => ICoercible m a | a -> m where
     asBit    :: a -> m PureBit
     asBit _ = return True