mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-24 03:52:50 -06:00
enable parsing of empty string
This commit is contained in:
@@ -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])
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user