summaryrefslogtreecommitdiff
path: root/src/GF/Compile/AbsCompute.hs
diff options
context:
space:
mode:
authorkrasimir <krasimir@chalmers.se>2009-10-02 23:34:35 +0000
committerkrasimir <krasimir@chalmers.se>2009-10-02 23:34:35 +0000
commit4c77dcf9388315411539b513aaac5f48b5c875ad (patch)
tree0a857e4c41fee417a35d41a0e3adffc9c100a3de /src/GF/Compile/AbsCompute.hs
parentd64419f2f25f0fb5a28bddf198dce6ac26b75296 (diff)
merge GF.Grammar.API into GF.Grammar
Diffstat (limited to 'src/GF/Compile/AbsCompute.hs')
-rw-r--r--src/GF/Compile/AbsCompute.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/GF/Compile/AbsCompute.hs b/src/GF/Compile/AbsCompute.hs
index 3f4c6d061..bfc824d82 100644
--- a/src/GF/Compile/AbsCompute.hs
+++ b/src/GF/Compile/AbsCompute.hs
@@ -36,10 +36,10 @@ import Text.PrettyPrint
tracd m t = t
-- tracd = trace
-compute :: Grammar -> Exp -> Err Exp
+compute :: SourceGrammar -> Exp -> Err Exp
compute = computeAbsTerm
-computeAbsTerm :: Grammar -> Exp -> Err Exp
+computeAbsTerm :: SourceGrammar -> Exp -> Err Exp
computeAbsTerm gr = computeAbsTermIn (lookupAbsDef gr) []
-- | a hack to make compute work on source grammar as well