From bc286c7f2ceb5c3d2e06ec72f78d28842f94ef65 Mon Sep 17 00:00:00 2001
From: Roy Frostig <rfrostig@mozilla.com>
Date: Thu, 24 Jun 2010 08:13:32 -0700
Subject: Resolve and typecheck patterns in pattern alt.

---
 src/boot/fe/ast.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/boot/fe/ast.ml')

diff --git a/src/boot/fe/ast.ml b/src/boot/fe/ast.ml
index bf7a11ff..438d9de9 100644
--- a/src/boot/fe/ast.ml
+++ b/src/boot/fe/ast.ml
@@ -300,7 +300,7 @@ and domain =
 
 and pat =
     PAT_lit of lit
-  | PAT_tag of ident * (pat array)
+  | PAT_tag of ((name identified) * (pat array))
   | PAT_slot of ((slot identified) * ident)
   | PAT_wild
 
-- 
cgit v1.2.3