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

some godis additions to dialogue

Browse Source
This commit is contained in:
aarne
2006-05-17 21:04:54 +00:00
parent cc07890344
commit 747eccf2df
5 changed files with 44 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
examples/dialogue/ResProlog.gf
View File

@@ -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) ;