diff options
| author | aarne <unknown> | 2003-11-25 15:11:59 +0000 |
|---|---|---|
| committer | aarne <unknown> | 2003-11-25 15:11:59 +0000 |
| commit | 1574e20786d2aa6eceb95ccfae54e7a0fc77785b (patch) | |
| tree | 2410f95059bcdf50898ece039f69cfef76b7d77e /grammars/database | |
| parent | 3c944827699b62a5620e433f3069675f99f46787 (diff) | |
New place for new resource API implementations.
Diffstat (limited to 'grammars/database')
| -rw-r--r-- | grammars/database/DatabaseEng.gf | 6 | ||||
| -rw-r--r-- | grammars/database/RestaurantEng.gf | 2 |
2 files changed, 4 insertions, 4 deletions
diff --git a/grammars/database/DatabaseEng.gf b/grammars/database/DatabaseEng.gf index 29ae87fec..971ab96a5 100644 --- a/grammars/database/DatabaseEng.gf +++ b/grammars/database/DatabaseEng.gf @@ -1,6 +1,6 @@ --# -path=.:../resource/nabstract:../resource/nenglish:../prelude -concrete DatabaseEng of Database = open Prelude, ResEng in { +concrete DatabaseEng of Database = open Prelude, ResourceEng in { flags lexer=text ; unlexer=text ; @@ -17,8 +17,8 @@ lincat lin WhichAre A B = QuestPhrase (IntVP (NounIPMany A) (PosVG (PredAP B))) ; - IsThere A = QuestPhrase (IsThereCN A) ; - AreThere A = QuestPhrase (AreThereCN NoNum A) ; + IsThere A = QuestPhrase (IsThereNP (IndefOneNP A)) ; + AreThere A = QuestPhrase (IsThereNP (IndefManyNP NoNum A)) ; WhatIs val = QuestPhrase (IntVP WhatOne (PosVG (PredNP val))) ; IsIt Q A = QuestPhrase (QuestVP Q (PosVG (PredAP A))) ; diff --git a/grammars/database/RestaurantEng.gf b/grammars/database/RestaurantEng.gf index 04e89a5b6..9b0b208a3 100644 --- a/grammars/database/RestaurantEng.gf +++ b/grammars/database/RestaurantEng.gf @@ -1,7 +1,7 @@ --# -path=.:../resource/nabstract:../resource/nenglish:../prelude concrete RestaurantEng of Restaurant = - DatabaseEng ** open Prelude,ParadigmsEng in { + DatabaseEng ** open Prelude, ParadigmsEng in { lin Restaurant = cnNonhuman "restaurant" ; |