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

added some functions to overloaded API

Browse Source
This commit is contained in:
aarne
2008-06-09 15:54:03 +00:00
parent aa5cff205d
commit 49dcc123b5
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
examples/tutorial/resource-foods/ExtFoodsI.gf
View File

@@ -19,7 +19,7 @@ incomplete concrete ExtFoodsI of ExtFoods = FoodsI ** open Syntax, LexFoods in {
mkText (mkQS (mkQCl (mkIP whichSg_IDet kind) guest verb)) ; mkText (mkQS (mkQCl (mkIP whichSg_IDet kind) guest verb)) ;
WhichVerbWant kind guest verb = WhichVerbWant kind guest verb =
mkText (mkQS (mkQCl (mkIP whichSg_IDet kind) mkText (mkQS (mkQCl (mkIP whichSg_IDet kind)
(mkSlash guest want_VV verb))) ; (mkClSlash guest want_VV verb))) ;
WhichIs kind quality = WhichIs kind quality =
mkText (mkQS (mkQCl (mkIP whichSg_IDet kind) (mkVP quality))) ; mkText (mkQS (mkQCl (mkIP whichSg_IDet kind) (mkVP quality))) ;