Changeset 13365 for src/Pugs/Prim/Match.hs

Timestamp:

09/16/06 14:29:48 (2 years ago)

Author:

audreyt

Message:

* Finish the s:g/evalPGE/evalPGR/ transition.
* Remaining open issues:

• should there be a pragma (or something else) that switches back to Parrot/PGE for rules?
• if not, should we completely remove Pugs.Embed.Parrot?

Files:

• src/Pugs/Prim/Match.hs (modified) (1 diff)

src/Pugs/Prim/Match.hs

@@ -47 +47 @@
         return (name, text)
     text <- ruleWithAdverbs rule
-    pge  <- liftIO $ evalPGE pwd (encodeUTF8 cs) (encodeUTF8 text) subrules
+    pge  <- liftIO $ evalPCR pwd (encodeUTF8 cs) (encodeUTF8 text) subrules
             `catchIO` (\e -> return $ show e)
     rv  <- tryIO Nothing $ fmap Just (readIO $ decodeUTF8 pge)