GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-20 00:22:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #84 from ffrixslee/issue-46

Browse Source 
Issue 46 (various deprecations during compilation of GF)
This commit is contained in:
Inari Listenmaa
2021-06-29 23:48:00 +02:00
committed by GitHub
parent 3a27fa0d39 76bec6d71e
commit 6efbd23c5c
8 changed files with 27 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
src/server/PGFService.hs
View File

@@ -1032,6 +1032,7 @@ instance JSON PGF.Trie where
showJSON (PGF.Ap f [[]]) = makeObj ["fun".=f] -- leaf
-- showJSON (PGF.Ap f [es]) = makeObj ["fun".=f,"children".=es] -- one alternative
showJSON (PGF.Ap f alts) = makeObj ["fun".=f,"alts".=alts]
readJSON = error "PGF.Trie.readJSON intentionally not defined"
instance JSON PGF.CId where
readJSON x = readJSON x >>= maybe (fail "Bad language.") return . PGF.readLanguage