GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-23 19:42:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

short-phrase translation; added Swe; started doc in Phrasebook

Browse Source
This commit is contained in:
aarne
2010-03-28 15:28:02 +00:00
parent 5c0fb2cb7e
commit c99ecf2704
20 changed files with 199 additions and 56 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
examples/phrasebook/PhrasebookFin.gf
View File

@@ -4,21 +4,11 @@ concrete PhrasebookFin of Phrasebook =
GreetingsFin,
WordsFin ** open
SyntaxFin,
ResFin, ---- for Num to Utt
Prelude in {
lincat
Phrase = Text ;
lin
PNumeral n =
mkPhrase (ss ((SyntaxFin.mkCard <n : Numeral>).s ! Sg ! Nom)) ; ----
PSentence s = mkText s | lin Text (mkUtt s) ; -- optional .
PQuestion s = mkText s | lin Text (mkUtt s) ; -- optional ?
PGreeting g = mkPhrase g ;
PSentence s = mkText s ;
PQuestion s = mkText s ;
oper
mkPhrase : SS -> Utt = \s -> lin Utt s ;
}