summaryrefslogtreecommitdiff
path: root/src/GF/UseGrammar
diff options
context:
space:
mode:
authoraarne <aarne@cs.chalmers.se>2005-12-11 17:48:55 +0000
committeraarne <aarne@cs.chalmers.se>2005-12-11 17:48:55 +0000
commit9f867c4922cccb6e61b273a55103e2afaeac4bde (patch)
treeb31dba589c596b272d0e6ad0fec7079cd0d92ab5 /src/GF/UseGrammar
parent8ee11c0e7edaa32b606ac96ec24cc2f8d0bca2e3 (diff)
float parsing fixed
Diffstat (limited to 'src/GF/UseGrammar')
-rw-r--r--src/GF/UseGrammar/Linear.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/UseGrammar/Linear.hs b/src/GF/UseGrammar/Linear.hs
index 7e052426d..9d76442ae 100644
--- a/src/GF/UseGrammar/Linear.hs
+++ b/src/GF/UseGrammar/Linear.hs
@@ -259,7 +259,7 @@ linearizeToStrss gr mk e = do
allLinsOfFun :: CanonGrammar -> CIdent -> Err [[(Label,[([Patt],Term)])]]
allLinsOfFun gr f = do
t <- lookupLin gr f
- allLinValues t
+ allAllLinValues t --- all fields, not only s. 11/12/2005
-- | returns printname if one exists; otherwise linearizes with metas