diff options
| author | john.j.camilleri <john.j.camilleri@chalmers.se> | 2013-09-16 07:17:27 +0000 |
|---|---|---|
| committer | john.j.camilleri <john.j.camilleri@chalmers.se> | 2013-09-16 07:17:27 +0000 |
| commit | f5461eb3d4eb2605b546a4ed202c12bcdaa1f4e4 (patch) | |
| tree | 946c9e8542b8e8271b6b529a95c0400fa6613cb4 /examples/messages/MessagesEng.gf | |
| parent | 8e1c6cca407c82fc09569d80c231b8d256735989 (diff) | |
Remove contribs and examples
Everything has now been moved to a separate repository at
https://github.com/GrammaticalFramework/gf-contrib
The contents of the examples folder are build during SetupWeb
Diffstat (limited to 'examples/messages/MessagesEng.gf')
| -rw-r--r-- | examples/messages/MessagesEng.gf | 54 |
1 files changed, 0 insertions, 54 deletions
diff --git a/examples/messages/MessagesEng.gf b/examples/messages/MessagesEng.gf deleted file mode 100644 index f45fca90f..000000000 --- a/examples/messages/MessagesEng.gf +++ /dev/null @@ -1,54 +0,0 @@ ---# -path=.:../phrasebook:present - -concrete MessagesEng of Messages = - WordsEng - - [IMale, IFemale, YouFamMale, YouFamFemale, YouPolMale, YouPolFemale], - GreetingsEng ** open - SyntaxEng, - ParadigmsEng, - (Phr = PhrasebookEng) - in { - -lincat - Message = Text ; - Heading = Text ; - Body = Text ; - Ending = Text ; - Statement = Text ; - Recipient = NP ; - Sender = NP ; - Title = CN ; - Role = Phr.NPPerson ; - -lin - Msg h b e = mkText h (mkText b e) ; - - HHello n = - mkText (strText "hello") (mkText (mkPhrase (mkUtt n)) (strText ",")) ; - HDear n = - mkText (strText "dear") (mkText (mkPhrase (mkUtt n)) (strText ",")) ; - - BOne p = p ; - BMore p b = mkText p b ; - - ERegards n = mkText (strText "regards") (mkPhrase (mkUtt n)) ; - - SSentence s = mkText s ; - SQuestion s = mkText s ; - SGreeting s = mkText s exclMarkPunct ; - - RName n = n ; - RTitle t n = mkNP (mkCN t n) ; - SName n = n ; - - TMr = mkCN (mkN "Mr") ; - TMs = mkCN (mkN "Ms") ; - - RI = Phr.IMale ; -- gender and politeness don't matter in English - RYou = Phr.YouFamMale ; - - PRole r = r ; - -oper - strText : Str -> Text = \s -> lin Text {s = s} ; -}
\ No newline at end of file |