diff options
Diffstat (limited to 'src/GF/Speech/SRG.hs')
| -rw-r--r-- | src/GF/Speech/SRG.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/Speech/SRG.hs b/src/GF/Speech/SRG.hs index 8080b941f..03204d888 100644 --- a/src/GF/Speech/SRG.hs +++ b/src/GF/Speech/SRG.hs @@ -74,7 +74,7 @@ makeSimpleSRG :: Ident -- ^ Grammar name -> CGrammar -- ^ A context-free grammar -> SRG makeSimpleSRG - = makeSRG_ (removeLeftRecursion . removeIdenticalRules . removeEmptyCats) + = makeSRG_ (removeLeftRecursion . removeIdenticalRules . removeEmptyCats . removeCycles) -- | Create a SRG preserving the names, profiles and probabilities of the -- input grammar. The returned grammar may be left-recursive. |