From: timv <tim.f.vieira@gmail.com>
Date: Tue, 11 Dec 2012 06:55:06 +0000 (-0500)
Subject: merge
X-Git-Url: https://hydra-www.ietfng.org/gitweb/?a=commitdiff_plain;h=2517147dc36abdfb3fa6e4c4a57f136f5e5ca2e5;p=dyna2

merge
---

2517147dc36abdfb3fa6e4c4a57f136f5e5ca2e5
diff --cc src/Dyna/Backend/Python.hs
index e654288,b7152af..3027b0c
--- a/src/Dyna/Backend/Python.hs
+++ b/src/Dyna/Backend/Python.hs
@@@ -117,9 -117,11 +117,9 @@@ combinePlans = go (M.empty
      nel (Just x) = x
  
  
 --- timv: consider flattening FRUle and ANFState
 -
  py (cruxf,cruxa) (FRule h _ _ r span _) dope =
             "@register" <> (parens $ dquotes $ pretty cruxf <> "/" <> (text $ show cruxa))
-    `above` "def _(_H, _V):"
+    `above` "def _(_h, _v):"
     `above` (indent 4 $ go dope)
  
   where
@@@ -169,10 -171,11 +169,10 @@@ processFile_ fileName fh = d
                  displayIO fh $ renderPretty 1.0 100
                            $ py fa r dope
                  hPutStrLn fh ""
 ---            hPutStrLn fh ""
  
   where
-   headVar = "_H"
-   valVar  = "_V"
+   headVar = "_h"
+   valVar  = "_v"
  
  
  -- TEST: processFile "examples/cky.dyna"