()

diff --git a/src/Dyna/Backend/Python/Backend.hs b/src/Dyna/Backend/Python/Backend.hs
index c71a0ae2598263677406d7e80bd5cc6fb3572c14..2dc3094ab3c51293dba79ab43856e7161d0a80a7 100644 (file)
--- 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 ""        )