diff options
| author | bringert <bringert@cs.chalmers.se> | 2006-01-17 02:13:57 +0000 |
|---|---|---|
| committer | bringert <bringert@cs.chalmers.se> | 2006-01-17 02:13:57 +0000 |
| commit | d4d89c72f370fe4c63cc5aaa612e64cb09c6f650 (patch) | |
| tree | 1fb26d529d18f9858843439c1acc3f0d43a5a474 /src/GF/System/NoSpeechInput.hs | |
| parent | 74c5d41152a0315e038e3d37ac992a26f975b729 (diff) | |
Use cat and language in ATK si. Support language switching with ATK.
Diffstat (limited to 'src/GF/System/NoSpeechInput.hs')
| -rw-r--r-- | src/GF/System/NoSpeechInput.hs | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/src/GF/System/NoSpeechInput.hs b/src/GF/System/NoSpeechInput.hs index ca78bc3ee..04197ce92 100644 --- a/src/GF/System/NoSpeechInput.hs +++ b/src/GF/System/NoSpeechInput.hs @@ -18,6 +18,11 @@ import GF.Infra.Ident (Ident) import GF.Infra.Option (Options) import GF.Conversion.Types (CGrammar) + recognizeSpeech :: Ident -- ^ Grammar name - -> Options -> CGrammar -> IO String -recognizeSpeech _ _ _ = fail "No speech input available" + -> String -- ^ Language, e.g. en_UK + -> CGrammar -- ^ Context-free grammar for input + -> String -- ^ Start category name + -> Int -- ^ Number of utterances + -> IO [String] +recognizeSpeech _ _ _ _ _ = fail "No speech input available" |