From f848857519bfb093310503108ff62297ea9f8a24 Mon Sep 17 00:00:00 2001 From: krasimir Date: Fri, 20 Feb 2015 13:26:12 +0000 Subject: added option -plus-as-bind which treats (+) as a bind when used with runtime variables --- src/compiler/GF/Compile/ConcreteToHaskell.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/compiler/GF/Compile/ConcreteToHaskell.hs') diff --git a/src/compiler/GF/Compile/ConcreteToHaskell.hs b/src/compiler/GF/Compile/ConcreteToHaskell.hs index f25246bd3..a2106a2f4 100644 --- a/src/compiler/GF/Compile/ConcreteToHaskell.hs +++ b/src/compiler/GF/Compile/ConcreteToHaskell.hs @@ -20,7 +20,7 @@ import Debug.Trace concretes2haskell opts absname gr = [(cncname,concrete2haskell opts gr cenv absname cnc cncmod) - | let cenv = resourceValues gr, + | let cenv = resourceValues opts gr, cnc<-allConcretes gr absname, let cncname = render cnc ++ ".hs" Ok cncmod = lookupModule gr cnc -- cgit v1.2.3