From cbc31ea01ef28f60639e4752ee6413b17f038fbc Mon Sep 17 00:00:00 2001
From: Graydon Hoare <graydon@mozilla.com>
Date: Thu, 8 Jul 2010 21:55:15 -0700
Subject: Add detection for cyclic imports.

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

(limited to 'src/boot/me/effect.ml')

diff --git a/src/boot/me/effect.ml b/src/boot/me/effect.ml
index 795f1990..3ec492c8 100644
--- a/src/boot/me/effect.ml
+++ b/src/boot/me/effect.ml
@@ -320,7 +320,7 @@ let process_crate
   in
   let root_scope = [ SCOPE_crate crate ] in
   let auth_effect name eff =
-    match lookup_by_name cx root_scope name with
+    match lookup_by_name cx [] root_scope name with
         None -> ()
       | Some (_, id) ->
           if referent_is_item cx id
-- 
cgit v1.2.3