Changeset 15397 for src/Pugs/Meta

Timestamp:

03/01/07 16:47:14 (21 months ago)

Author:

audreyt

Message:

* Pugs.Meta: Avoid warnings and start to lay groundwork

for further Pugs.Meta.* calls.

Location:

src/Pugs/Meta

Files:

• Class.hs (modified) (1 diff)
• Str.hs (modified) (1 diff)

src/Pugs/Meta/Class.hs

@@ -1 +1 @@
 {-# OPTIONS_GHC -fglasgow-exts #-}
 
-module Pugs.Meta.Class where
+module Pugs.Meta.Class () where
 import Pugs.Val
 import Pugs.Class

src/Pugs/Meta/Str.hs

@@ -13 +13 @@
     [ "reverse"     ... (MkStr . Str.reverse . unStr)
     , "HOW"         ... (const _StrClass)
+    , "WHICH"       ... id
     ]