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

fixes in parsing

Browse Source
This commit is contained in:
aarne
2004-06-22 12:33:31 +00:00
parent 3986f8c265
commit 53f7d4ecfb
7 changed files with 31 additions and 24 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
src/GF/API.hs
View File

@@ -201,9 +201,10 @@ optLinearizeTree opts0 gr t = case getOptVal opts transferFun of
lin mk
| oElem showRecord opts = liftM prt . linearizeNoMark g c
| oElem tableLin opts = liftM (unlines . map untok . prLinTable) .
| oElem tableLin opts = liftM (unlines . map untok . prLinTable True) .
allLinTables g c
| oElem showAll opts = liftM (unlines . map untok . prLinTable False) .
allLinTables g c
| oElem showAll opts = return . unlines . linTree2strings mk g c
| otherwise = return . unlines . optIntOrOne . linTree2strings mk g c
g = grammar gr
c = cncId gr