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

Add FoodsChi, FoodsHeb to LPGF testsuite

Browse Source
This commit is contained in:
John J. Camilleri
2021-02-09 10:14:40 +01:00
parent 34f0fc0ba7
commit 9c2d8eb0b2
5 changed files with 187 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -148,7 +148,7 @@ lin2string l = case l of
LFEmpty -> ""
LFToken tok -> tok
LFTuple [l] -> lin2string l
LFConcat l1 l2 -> unwords [lin2string l1, lin2string l2]
LFConcat l1 l2 -> unwords $ filter (not.null) [lin2string l1, lin2string l2]
x -> printf "[%s]" (show x)
(!!) :: (Show a) => [a] -> Int -> a