Changeset 9309 for src/Pugs/Prim/Yaml.hs

Timestamp:

03/06/06 22:27:05 (3 years ago)

Author:

audreyt

Message:

* sweeping warnings fix on unused imports and functions.

Files:

• src/Pugs/Prim/Yaml.hs (modified) (2 diffs)

src/Pugs/Prim/Yaml.hs

@@ -15 +15 @@
 import qualified Data.FastPackedString as Str
 import DrIFT.YAML
-
-type Str = Str.FastString
 
 evalYaml :: Val -> Eval Val
@@ -68 +66 @@
         Just x   -> error ("can't deserialize: " ++ (Str.unpack x))
 
-dumpYaml :: Int -> Val -> Eval Val
-dumpYaml limit v = do
+dumpYaml :: Val -> Eval Val
+dumpYaml v = do
     let ?seen = IntSet.empty
     obj     <- toYaml v