diff options
| author | bringert <bringert@cs.chalmers.se> | 2007-06-26 15:09:48 +0000 |
|---|---|---|
| committer | bringert <bringert@cs.chalmers.se> | 2007-06-26 15:09:48 +0000 |
| commit | 88653403fc5602f1c0ee8d3bef789ac98c9b67c7 (patch) | |
| tree | 77d70c826591dc41b58ada8d0a2f313685634cc5 /src/GF | |
| parent | 3371605af01d49c6a0f5bec07763827f279fff61 (diff) | |
Oops, I had managed to remove the preprocessing step in makeSimpleRegular, which broke SLF and non-rec SRGS generation for grammars which need bottom-up filtering.
Diffstat (limited to 'src/GF')
| -rw-r--r-- | src/GF/Speech/CFGToFiniteState.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/Speech/CFGToFiniteState.hs b/src/GF/Speech/CFGToFiniteState.hs index 9e985d4d2..df4346d20 100644 --- a/src/GF/Speech/CFGToFiniteState.hs +++ b/src/GF/Speech/CFGToFiniteState.hs @@ -62,7 +62,7 @@ cfgToFA opts s = minimize $ compileAutomaton start $ makeSimpleRegular opts s where start = getStartCatCF opts s makeSimpleRegular :: Options -> StateGrammar -> CFRules -makeSimpleRegular opts s = makeRegular $ cfgToCFRules s +makeSimpleRegular opts s = makeRegular $ preprocess $ cfgToCFRules s where start = getStartCatCF opts s preprocess = fix (topDownFilter start . bottomUpFilter) . removeCycles |