From 747eccf2df19fa85a09b72cd1786372367c21976 Mon Sep 17 00:00:00 2001 From: aarne Date: Wed, 17 May 2006 21:04:54 +0000 Subject: some godis additions to dialogue --- examples/dialogue/ResProlog.gf | 1 + 1 file changed, 1 insertion(+) (limited to 'examples/dialogue/ResProlog.gf') diff --git a/examples/dialogue/ResProlog.gf b/examples/dialogue/ResProlog.gf index 8b6dadef6..ce3bbce4b 100644 --- a/examples/dialogue/ResProlog.gf +++ b/examples/dialogue/ResProlog.gf @@ -4,6 +4,7 @@ resource ResProlog = open Prelude in { bracket : Str -> Str = \s -> "[" ++ s ++ "]" ; app1 : Str -> Str -> Str = \f,x -> f ++ paren x ; + app2 : Str -> Str -> Str -> Str = \f,x,y -> f ++ paren (x ++ "," ++ y) ; apps : Str -> SS -> SS = \f,x -> ss (app1 f x.s) ; -- cgit v1.2.3