aboutsummaryrefslogtreecommitdiff
path: root/src/boot/me/effect.ml
diff options
context:
space:
mode:
authorGraydon Hoare <[email protected]>2010-07-27 11:19:43 -0700
committerGraydon Hoare <[email protected]>2010-07-27 11:19:43 -0700
commit4d31cf1dc58794b8f72240eb19c48b392e9de7b2 (patch)
treea5b4c7eb4cc39dac8d1a86cc13b8526c4c7f730b /src/boot/me/effect.ml
parentSlight shaving on RA, no more optimizing today. It's fast enough for now. (diff)
downloadrust-4d31cf1dc58794b8f72240eb19c48b392e9de7b2.tar.xz
rust-4d31cf1dc58794b8f72240eb19c48b392e9de7b2.zip
Distill semantics of use-def maps to fewer and more-obvious words.
- Remove redundant uses of 'resolve' and 'referent' in semant. - Use defn, defn_id, lval, lval_base more consistently. - Make associated query functions more consistent. - Closes #127.
Diffstat (limited to 'src/boot/me/effect.ml')
-rw-r--r--src/boot/me/effect.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/boot/me/effect.ml b/src/boot/me/effect.ml
index c55e1d12..79868def 100644
--- a/src/boot/me/effect.ml
+++ b/src/boot/me/effect.ml
@@ -172,7 +172,7 @@ let function_effect_propagation_visitor
lower_to s taux.Ast.fn_effect;
| _ -> bug () "non-fn callee"
in
- if lval_is_slot cx fn
+ if lval_base_is_slot cx fn
then
lower_to_callee_ty (lval_ty cx fn)
else
@@ -335,7 +335,7 @@ let process_crate
match lookup_by_name cx [] root_scope name with
None -> ()
| Some (_, id) ->
- if referent_is_item cx id
+ if defn_id_is_item cx id
then htab_put item_auth id eff
else err (Some id) "auth clause in crate refers to non-item"
in