making parsing ImperC work

This commit is contained in:
aarne committed 2004-09-22 20:42:21 +00:00
1 parent a0116fd288
commit d5b4230d6d
6 files changed
+51 -31

No files matched your search

+2
View File
@@ -67,4 +67,6 @@ resource ResImper = {
ss (s ++ ";" ++ i.s) ** {s2 = v ++ i.s2 ; s3 = i.s3} ;
binop : Str -> SS -> SS -> SS = \op, x, y ->
ss (x.s ++ y.s ++ op ++ ";") ;
binopt : Str -> SS -> SS -> SS -> SS = \op, x, y, t ->
ss (x.s ++ y.s ++ t.s ++ op ++ ";") ;
}