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

Timestamp:

10/17/06 08:25:35 (2 years ago)

Author:

audreyt

svk:copy_cache_prev:

21206

Message:

* Remove Judy from the Pugs build process.

This is a pervasive change to avoid GC issues completely
before the release, as the nature of addForeignPtrFinalizer's
weird interaction with GHC is not fully diagnosed.

Also, TVar/IORef based storage, which was exceedingly slow
in GHC 6.4, now actually compares competitively with Judy maps.
Judy is still more memory efficient and may be faster on some
architectures, but its re-incoporation will have to wait until
after release and a fuller understanding of its use of FFI/GC.

Files:

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

src/Pugs/Prim/Yaml.hs

@@ -10 +10 @@
 import qualified Data.IntSet as IntSet
 import qualified Data.ByteString as Str
+import qualified Data.HashTable as H
 import DrIFT.YAML
-
-import qualified Judy.CollectionsM as C
 
 evalYaml :: Val -> Eval Val
@@ -34 +33 @@
                 val <- newScalar =<< fromYaml valNode
                 return (key, val)
-            hv      <- liftIO $ (C.fromList vals :: IO IHash)
+            hv      <- liftIO $ (H.fromList H.hashString vals :: IO IHash)
             return $ VRef (hashRef hv)
         Just s | (pre, post) <- Str.splitAt 16 s   -- 16 == length "tag:pugs:Object:"