aboutsummaryrefslogtreecommitdiff
path: root/src/boot/me/resolve.ml
diff options
context:
space:
mode:
authorGraydon Hoare <[email protected]>2010-07-02 16:27:39 -0700
committerGraydon Hoare <[email protected]>2010-07-02 16:27:39 -0700
commit8660ce50a134a74bc841f32e50eb1eab83f8b45b (patch)
treeaeb7795b09c1d2507198cfa8642ef797d685bc8f /src/boot/me/resolve.ml
parentFix bug in clone logic; was ignoring the mutability-strip step in later rule. (diff)
parentFix two bugs in tag patterns: 1. Look up the tag constructor function item us... (diff)
downloadrust-8660ce50a134a74bc841f32e50eb1eab83f8b45b.tar.xz
rust-8660ce50a134a74bc841f32e50eb1eab83f8b45b.zip
Merge branch 'master' of [email protected]:graydon/rust into exterior_and_mutable_types
Diffstat (limited to 'src/boot/me/resolve.ml')
-rw-r--r--src/boot/me/resolve.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/boot/me/resolve.ml b/src/boot/me/resolve.ml
index 5077d5ce..641df884 100644
--- a/src/boot/me/resolve.ml
+++ b/src/boot/me/resolve.ml
@@ -931,7 +931,7 @@ let pattern_resolving_visitor
Ast.PAT_tag (lval, pats) ->
let lval_nm = lval_to_name lval in
let lval_id = lval_base_id lval in
- let tag_ctor_id = lval_to_referent cx lval_id in
+ let tag_ctor_id = (lval_item cx lval).id in
if referent_is_item cx tag_ctor_id
(* FIXME (issue #76): we should actually check here that the