msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

corrections in Attempto grammars

Browse Source
This commit is contained in:
aarne
2008-11-08 09:38:32 +00:00
parent 70e49b204c
commit fc0432e4e1
9 changed files with 48 additions and 34 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
examples/attempto/TestAttemptoEng.gf
View File

@@ -5,15 +5,15 @@ concrete TestAttemptoEng of TestAttempto = AttemptoEng **
lin card_N = mkkN "card" ;
lin water_MCN = mkCN (mkkN "water") ;
lin john_PN = mkPN "john" ;
lin john_PN = mkPN "John" ;
lin apple_N = mkkN "apple" ;
lin sleep_V = IrregEng.sleep_V ;
lin young_A = mkA "young" ;
lin dog_N = mkkN "dog" ;
lin animal_N = mkkN "animal" ;
lin wait_V = mkV "wait" ;
lin man_N = mkkN "man" ;
lin woman_N = mkkN "woman" ;
lin man_N = mkCN (mkN "man" "men") ;
lin woman_N = mkCN (mkN "woman" "women") ;
lin give_V3 = mkV3 give_V (mkPrep []) (mkPrep "to") ;
lin tired_A = mkA "tired" ;
lin rich_A = mkA "rich" ;
@@ -25,7 +25,7 @@ lin lucky_A = mkA "lucky" ;
lin well_known_A = mkA "well" ;
lin important_A = mkA "important" ;
lin expensive_A = mkA "expensive" ;
lin fill_in_V2 = mkV2 "fill" ;
lin fill_in_V2 = mkV2 (partV (mkV "fill") "in") ;
lin form_N = mkkN "form" ;
lin age_N = mkkN "age" ;
lin teacher_N = mkkN "teacher" ;
@@ -41,7 +41,7 @@ lin eat_V2 = mkV2 eat_V ;
lin burger_N = mkkN "burger" ;
lin earn_V2 = mkV2 "earn" ;
lin income_N = mkkN "income" ;
lin england_PN = mkPN "england" ;
lin england_PN = mkPN "England" ;
lin beginning_N = mkkN "beginning" ;
lin office_N = mkkN "office" ;
lin interested_A2 = mkA2 (mkA "interested") (mkPrep "in") ;