GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-15 15:59:32 -06:00
Code Issues Packages Projects Releases Wiki Activity

Add Afr, Amh, Cat, Cze, Dut, Ger foods grammars to testsuite

Browse Source
This commit is contained in:
John J. Camilleri
2021-02-16 22:33:26 +01:00
parent 2d03b9ee0c
commit 312cfeb69d
11 changed files with 316 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/runtime/haskell/LPGF.hs
View File

@@ -131,7 +131,8 @@ linearizeConcreteText concr expr = lin2string $ lin (expr2tree expr)
Fun f as ->
case Map.lookup f (lins concr) of
Just t -> eval (map lin as) t
_ -> error $ printf "Lookup failed for function: %s" (showCId f)
-- _ -> error $ printf "Lookup failed for function: %s" (showCId f)
_ -> LFToken $ T.pack $ printf "[%s]" (showCId f)
x -> error $ printf "Cannot lin: %s" (prTree x)
-- | Evaluation context is a sequence of terms