Changeset 4457

Timestamp:

06/08/05 15:25:19 (4 years ago)

Author:

iblech

svk:copy_cache_prev:

6052

Message:

* Pugs.Eval -- Silenced a warning about an unused parameter.
* Pugs.Parser -- Extremely minor cosmetical fix.
* READTHEM -- Added my favourite Monad tutorial :)

Files:

• READTHEM (modified) (1 diff)
• src/Pugs/Eval.hs (modified) (1 diff)
• src/Pugs/Parser.hs (modified) (1 diff)

READTHEM

@@ -30 +30 @@
 Harrorth  - A implemenation journal for a haskell project in tutorial format
   <http://feather.perl6.nl/~nothingmuch/harrorth/>
+All About Monads                                              - Jeff Newbern
+  <http://www.nomaware.com/monads/html/index.html>
 
 = Perl 6 books (always outdated :))

src/Pugs/Eval.hs

@@ -243 +243 @@
         let val = VRef vref
         return (key, val)
-    padEntryToHashEntry (key, []) = do fail "Nonexistant var in pad?"
+    padEntryToHashEntry (_, []) = do fail "Nonexistant var in pad?"
     doFindVarRef :: Var -> Eval (Maybe (TVar VRef))
     doFindVarRef name = do

src/Pugs/Parser.hs

@@ -983 +983 @@
     state <- getState
     case ruleDynParsers state of
-        MkDynParsersEmpty    -> refillCache state f
+        MkDynParsersEmpty   -> refillCache state f
         p                   -> f p
     where