diff options
Diffstat (limited to 'examples/phrasebook/PhrasebookRon.gf')
| -rw-r--r-- | examples/phrasebook/PhrasebookRon.gf | 14 |
1 files changed, 3 insertions, 11 deletions
diff --git a/examples/phrasebook/PhrasebookRon.gf b/examples/phrasebook/PhrasebookRon.gf index 40cdf1eda..cb4c7bacb 100644 --- a/examples/phrasebook/PhrasebookRon.gf +++ b/examples/phrasebook/PhrasebookRon.gf @@ -5,19 +5,11 @@ concrete PhrasebookRon of Phrasebook = WordsRon ** open SyntaxRon, - ResRon, ---- for Num to Utt Prelude in { -lincat - Phrase = Text ; - lin - PNumeral n = mkPhrase (ss ((mkCard <n : Numeral>).sp ! Masc)) ; ---- - PGreeting g = mkPhrase g ; - PSentence s = mkText s ; - PQuestion s = mkText s ; - -oper - mkPhrase : SS -> Utt = \s -> lin Utt s ; + PSentence s = mkText s | lin Text (mkUtt s) ; -- optional . + PQuestion s = mkText s | lin Text (mkUtt s) ; -- optional ? + PGreeting g = lin Text g ; } |
