summaryrefslogtreecommitdiff
path: root/examples/gfcc/ResImperEng.gf
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2010-03-02 19:27:34 +0000
committeraarne <aarne@chalmers.se>2010-03-02 19:27:34 +0000
commitdbe5a210b7d4a7940d9ffc76d862f6be2526bb37 (patch)
treec0479e1a30bce75252235d158b79b96d5cd32b33 /examples/gfcc/ResImperEng.gf
parente4748e998453b979af46983a079f2ec3d307ada4 (diff)
cleaned up gfcc ; added gfcc script
Diffstat (limited to 'examples/gfcc/ResImperEng.gf')
-rw-r--r--examples/gfcc/ResImperEng.gf16
1 files changed, 0 insertions, 16 deletions
diff --git a/examples/gfcc/ResImperEng.gf b/examples/gfcc/ResImperEng.gf
deleted file mode 100644
index 87cb30a54..000000000
--- a/examples/gfcc/ResImperEng.gf
+++ /dev/null
@@ -1,16 +0,0 @@
-resource ResImperEng = open Predef, Prelude in {
-
- oper
- indef = pre {"a" ;
- "an" / strs {"a" ; "e" ; "i" ; "o" ; "A" ; "E" ; "I" ; "O" }} ;
-
- constant : Str -> SS = ss ;
- prefix : Str -> SS -> SS -> SS = \f,x,y ->
- ss ("the" ++ f ++ "of" ++ x.s ++ "and" ++ y.s) ;
- comparison : Str -> SS -> SS -> SS = \f,x,y ->
- ss (x.s ++ "is" ++ f ++ "than" ++ y.s) ;
- continues : Str -> SS -> SS = \s,t -> ss (s ++ "." ++ t.s) ;
- continue : Str -> SS -> SS = \s,t -> ss (s ++ t.s) ;
- statement : Str -> SS = \s -> ss (s ++ ".");
-
-}