GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-03 16:22:52 -06:00
Code Issues Packages Projects Releases Wiki Activity

Changed all SRG printer to take Options and StateGrammar arguments. This makes Custom a lot cleaner.

Browse Source
This commit is contained in:
bringert
2007-01-05 15:38:47 +00:00
parent 9af5b77102
commit 028f2e108e
10 changed files with 83 additions and 123 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/GF/Speech/PrRegExp.hs
View File

@@ -12,11 +12,11 @@ module GF.Speech.PrRegExp (regexpPrinter) where
import GF.Conversion.Types
import GF.Infra.Ident
import GF.Infra.Option (Options)
import GF.Speech.CFGToFiniteState
import GF.Speech.RegExp
import GF.Compile.ShellState (StateGrammar)
regexpPrinter :: Ident -- ^ Grammar name
-> String -> StateGrammar -> String
regexpPrinter name start = prRE . dfa2re . cfgToFA start
regexpPrinter :: Options -> StateGrammar -> String
regexpPrinter opts s = prRE $ dfa2re $ cfgToFA opts s