From 49dcc123b54f7a0bff065da09c014a6ae12c9348 Mon Sep 17 00:00:00 2001 From: aarne Date: Mon, 9 Jun 2008 15:54:03 +0000 Subject: added some functions to overloaded API --- examples/tutorial/resource-foods/ExtFoodsI.gf | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'examples/tutorial') diff --git a/examples/tutorial/resource-foods/ExtFoodsI.gf b/examples/tutorial/resource-foods/ExtFoodsI.gf index def336e28..586f3e42b 100644 --- a/examples/tutorial/resource-foods/ExtFoodsI.gf +++ b/examples/tutorial/resource-foods/ExtFoodsI.gf @@ -19,7 +19,7 @@ incomplete concrete ExtFoodsI of ExtFoods = FoodsI ** open Syntax, LexFoods in { mkText (mkQS (mkQCl (mkIP whichSg_IDet kind) guest verb)) ; WhichVerbWant kind guest verb = mkText (mkQS (mkQCl (mkIP whichSg_IDet kind) - (mkSlash guest want_VV verb))) ; + (mkClSlash guest want_VV verb))) ; WhichIs kind quality = mkText (mkQS (mkQCl (mkIP whichSg_IDet kind) (mkVP quality))) ; -- cgit v1.2.3