Changeset 21673 for src/Pugs/Eval

Timestamp:

08/01/08 13:56:05 (4 months ago)

Author:

audreyt

Message:

* Import Pugs 6.2.13.11 from Hackage into our source tree.
* Highlights:

• Much faster startup time
• Slightly faster compilation time (mostly due to refactored Pugs.AST.Internals)
• Portable-to-Win32 readline thanks to Haskeline

Files:

• src/Pugs/Eval/Var.hs (modified) (3 diffs)

src/Pugs/Eval/Var.hs

@@ -7 +7 @@
 ) where
 import qualified Data.Map as Map
+import qualified StringTable.AtomMap as AtomMap
 import Pugs.Internals
 import Pugs.AST
@@ -18 +19 @@
 import Pugs.Class hiding (Val)
 import qualified Pugs.Val as Val
-import qualified UTF8 as Buf
+import qualified Data.ByteString.Char8 as Buf
 
 findVar :: Var -> Eval (Maybe VRef)
@@ -229 +230 @@
                 namVVs  <- do
                     list <- fromVal named
-                    fmap Map.fromList $ forM list $ \(k, v) -> do
+                    fmap AtomMap.fromList $ forM list $ \(k, v) -> do
                         key <- fromVal k
                         val <- fromVal v