diff src/source.sml @ 822:d4e811beb8eb

fn-pattern code in but not tested yet; hello compiles
author Adam Chlipala <adamc@hcoop.net>
date Thu, 28 May 2009 10:16:50 -0400
parents e2780d2f4afc
children 7f871c03e3a1
line wrap: on
line diff
--- a/src/source.sml	Tue May 26 12:25:06 2009 -0400
+++ b/src/source.sml	Thu May 28 10:16:50 2009 -0400
@@ -109,6 +109,7 @@
   | PPrim of Prim.t
   | PCon of string list * string * pat option
   | PRecord of (string * pat) list * bool
+  | PAnnot of pat * con
 
 and exp' =
     EAnnot of exp * con