From: timv <tim.f.vieira@gmail.com>
Date: Sun, 2 Jun 2013 17:47:58 +0000 (-0400)
Subject: ()
X-Git-Url: https://hydra-www.ietfng.org/gitweb/?a=commitdiff_plain;h=f841dc78b0cc64518c8ef0221729b2d4c18d7e54;p=dyna2

()
---

diff --git a/src/Dyna/Backend/Python/Backend.hs b/src/Dyna/Backend/Python/Backend.hs
index c71a0ae..2dc3094 100644
--- a/src/Dyna/Backend/Python/Backend.hs
+++ b/src/Dyna/Backend/Python/Backend.hs
@@ -115,6 +115,8 @@ constants = M.fromList
     ,(("|",2)     , PDBS $ infixOp "|"    )
     ,(("%",2)     , PDBS $ infixOp "%"    )
     ,(("**",2)    , PDBS $ infixOp "**"   )
+    ,(("==",2)    , PDBS $ infixOp "=="   )
+    ,(("!=",2)    , PDBS $ infixOp "!="   )
     ,(("<",2)     , PDBS $ infixOp "<"    )
     ,(("<=",2)    , PDBS $ infixOp "<="   )
     ,((">",2)     , PDBS $ infixOp ">"    )
@@ -135,7 +137,7 @@ constants = M.fromList
     ,(("abs",1)   , PDBS $ call "abs"     )
     ,(("log",1)   , PDBS $ call "log"     )
     ,(("exp",1)   , PDBS $ call "exp"     )
-    ,(("eval",1)  , PDBS $ call "None;exec "   )
+    ,(("eval",1)  , PDBS $ call "None;exec ")
     -- XXX not quite what we want, but something like this might
     -- be nice to have.
     -- ,(("pair",2)  , PDBS $ call ""        )