diff options
| author | krasimir <krasimir@chalmers.se> | 2008-06-03 06:59:44 +0000 |
|---|---|---|
| committer | krasimir <krasimir@chalmers.se> | 2008-06-03 06:59:44 +0000 |
| commit | ac8fa4fd5f8e996eb65f26d39b4bd4558a818cf8 (patch) | |
| tree | 8b518478b98582f4403a9b6929247d0f02a6b972 /src-3.0/PGF.hs | |
| parent | c161e0e4df906185521f75aebcd26b117f8ab48f (diff) | |
Hackish version of the incremental parser
Diffstat (limited to 'src-3.0/PGF.hs')
| -rw-r--r-- | src-3.0/PGF.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src-3.0/PGF.hs b/src-3.0/PGF.hs index 899d26d12..7a09bef59 100644 --- a/src-3.0/PGF.hs +++ b/src-3.0/PGF.hs @@ -170,7 +170,7 @@ linearize pgf lang = PGF.Linearize.linearize pgf (mkCId lang) parse pgf lang cat s = case lookParser pgf (mkCId lang) of Nothing -> error ("Unknown language: " ++ lang) - Just pinfo -> case parseFCF "bottomup" pinfo (mkCId cat) (words s) of + Just pinfo -> case parseFCFG "bottomup" pinfo (mkCId cat) (words s) of Ok x -> x Bad s -> error s |