--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/doc-src/Tutorial/CodeGen/expr Wed Aug 26 17:27:27 1998 +0200
@@ -0,0 +1,4 @@
+types 'v binop = 'v => 'v => 'v
+datatype ('a,'v) expr = Cex 'v
+ | Vex 'a
+ | Bex ('v binop) (('a,'v) expr) (('a,'v) expr)