diff src/cjr.sml @ 387:7abb28e9d51f

Binops; equality tested on int; lame 404 substitute
author Adam Chlipala <adamc@hcoop.net>
date Tue, 21 Oct 2008 09:50:19 -0400
parents e976b187d73a
children bb27c7efcd90
line wrap: on
line diff
--- a/src/cjr.sml	Sun Oct 19 16:49:09 2008 -0400
+++ b/src/cjr.sml	Tue Oct 21 09:50:19 2008 -0400
@@ -66,6 +66,9 @@
        | EFfiApp of string * string * exp list
        | EApp of exp * exp list
 
+       | EUnop of string * exp
+       | EBinop of string * exp * exp
+
        | ERecord of int * (string * exp) list
        | EField of exp * string