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

restored some functions in PhrasebookDut to make it complete again

Browse Source
This commit is contained in:
aarne
2014-06-19 18:08:03 +00:00
parent 0e940b7fd1
commit 85d80a89be
2 changed files with 7 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
examples/phrasebook/GreetingsDut.gf
View File

@@ -26,4 +26,5 @@ lin
GCongratulations = mkGreeting "gefeliciteerd"; GCongratulations = mkGreeting "gefeliciteerd";
GHappyBirthday = mkGreeting "gelukkige verjaardag" ; GHappyBirthday = mkGreeting "gelukkige verjaardag" ;
GGoodLuck = mkGreeting "veel geluk" ; GGoodLuck = mkGreeting "veel geluk" ;
GWhatTime = mkGreeting "hoe laat is het" ;
} }

10
examples/phrasebook/SentencesDut.gf
View File

@@ -2,7 +2,9 @@ concrete SentencesDut of Sentences = NumeralDut ** SentencesI -
[SHaveNo,SHaveNoMass, [SHaveNo,SHaveNoMass,
Proposition,Action, Is, IsMass, SProp, SPropNot, QProp, Proposition,Action, Is, IsMass, SProp, SPropNot, QProp,
AHaveCurr, ACitizen, ABePlace, AKnowSentence, AKnowPerson, AKnowQuestion, AHaveCurr, ACitizen, ABePlace, AKnowSentence, AKnowPerson, AKnowQuestion,
QDoHave, QWhereDoVerbPhrase, QModVerbPhrase, QWhereModVerbPhrase, SHave, SHaveNo, ---- QDoHave, QWhereDoVerbPhrase, QWhereModVerbPhrase, SHave,
SHaveNo,
QModVerbPhrase,
ADoVerbPhrase, AModVerbPhrase, ADoVerbPhrasePlace, AModVerbPhrasePlace] ADoVerbPhrase, AModVerbPhrase, ADoVerbPhrasePlace, AModVerbPhrasePlace]
with with
(Syntax = SyntaxDut), (Syntax = SyntaxDut),
@@ -43,9 +45,9 @@ concrete SentencesDut of Sentences = NumeralDut ** SentencesI -
AModVerbPhrasePlace m p vp x = prop (mkCl p.name (mkVP m (mkVP vp x.at))) ; AModVerbPhrasePlace m p vp x = prop (mkCl p.name (mkVP m (mkVP vp x.at))) ;
-- the old things -- the old things
-- lin lin
-- SHaveNo p k = mkS (mkCl p.name have_V2 (mkNP no_Quant plNum k)) ; SHaveNo p k = mkS (mkCl p.name have_V2 (mkNP no_Quant plNum k)) ;
-- SHaveNoMass p k = mkS (mkCl p.name have_V2 (mkNP no_Quant k)) ; SHaveNoMass p k = mkS (mkCl p.name have_V2 (mkNP no_Quant k)) ;
} }