mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-10-17 22:23:10 -06:00
New place for new resource API implementations.
This commit is contained in:
1 parent
3c94482769
commit
0878449cca
22 files changed
+5609
-4
No files matched your search
@@ -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))) ;
|
||||
|
||||
|
||||
@@ -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" ;
|
||||
|
||||
Reference in new issue
Block a user