diff options
Diffstat (limited to 'src/GF/Speech/TransformCFG.hs')
| -rw-r--r-- | src/GF/Speech/TransformCFG.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/GF/Speech/TransformCFG.hs b/src/GF/Speech/TransformCFG.hs index 076477d90..545bc021c 100644 --- a/src/GF/Speech/TransformCFG.hs +++ b/src/GF/Speech/TransformCFG.hs @@ -16,7 +16,7 @@ module GF.Speech.TransformCFG where -import GF.Canon.CanonToGFCC (mkCanon2gfcc) +import GF.Canon.CanonToGFCC (canon2gfcc) import qualified GF.GFCC.Raw.AbsGFCCRaw as C import GF.GFCC.Macros (lookType,catSkeleton) import GF.GFCC.DataGFCC (GFCC) @@ -85,7 +85,7 @@ getStartCatCF :: Options -> StateGrammar -> String getStartCatCF opts sgr = getStartCat opts sgr ++ "{}.s" stateGFCC :: StateGrammar -> GFCC -stateGFCC = mkCanon2gfcc . stateGrammarST +stateGFCC = canon2gfcc noOptions . stateGrammarST -- * Grammar filtering |
