mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-11 12:12:51 -06:00
Added semi-working speech_input command.
This commit is contained in:
@@ -37,7 +37,7 @@ import Data.Maybe (fromMaybe)
|
||||
faGraphvizPrinter :: Ident -- ^ Grammar name
|
||||
-> Options -> CGrammar -> String
|
||||
faGraphvizPrinter name opts cfg =
|
||||
prFAGraphviz $ mapStates (const "") $ cfgToFA name opts cfg
|
||||
prFAGraphviz $ mapStates (const "") $ cfgToFA opts cfg
|
||||
|
||||
|
||||
-- | Convert the grammar to a regular grammar and print it in BNF
|
||||
@@ -51,7 +51,7 @@ regularPrinter = prCFRules . makeSimpleRegular
|
||||
|
||||
faCPrinter :: Ident -- ^ Grammar name
|
||||
-> Options -> CGrammar -> String
|
||||
faCPrinter name opts cfg = fa2c $ cfgToFA name opts cfg
|
||||
faCPrinter name opts cfg = fa2c $ cfgToFA opts cfg
|
||||
|
||||
fa2c :: DFA String -> String
|
||||
fa2c fa = undefined
|
||||
Reference in New Issue
Block a user