C compiler

This commit is contained in:
aarne
2004-09-17 22:02:35 +00:00
parent ee3e5b0ae5
commit 96890f5fad
5 changed files with 157 additions and 1 deletions

13
examples/gfcc/ResImper.gf Normal file
View File

@@ -0,0 +1,13 @@
resource ResImper = open Prelude, Precedence in {
oper
continue : Str -> SS -> SS = \s -> infixSS ";" (ss s);
statement : Str -> SS = \s -> postfixSS ";" (ss s);
ex : {s : PrecTerm} -> Str = \exp -> exp.s ! p0 ;
infixL :
Prec -> Str -> {s : PrecTerm} -> {s : PrecTerm} -> {s : PrecTerm} =
\p,h,x,y -> {s = mkInfixL h p x.s y.s} ;
constant : Str -> {s : PrecTerm} = \c -> {s = mkConst c} ;
}