GitHub/gf-core
1
0 Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-11-04 19:25:27 -07:00
Code Issues Packages Projects Releases Wiki Activity

enable parsing of empty string

Browse Source
This commit is contained in:
kr.angelov committed 2006-06-01 21:37:22 +00:00
1 parent d1fa17ba6b
commit 81f2e036e7
1 file changed
+1
Download Patch File Download Diff File Expand all files Collapse all files
src/GF/Parsing/FCFG/PInfo.hs
+1
View File
@@ -34,6 +34,7 @@ type FCFParser c n t = FCFPInfo c n t
type FCFChart c n = [Abstract (c, RangeRec) n] type FCFChart c n = [Abstract (c, RangeRec) n]
makeFinalEdge :: c -> Int -> Int -> (c, RangeRec) makeFinalEdge :: c -> Int -> Int -> (c, RangeRec)
makeFinalEdge cat 0 0 = (cat, [EmptyRange])
makeFinalEdge cat i j = (cat, [makeRange i j]) makeFinalEdge cat i j = (cat, [makeRange i j])