diff --git a/src/Lib/ProcessModule.newt b/src/Lib/ProcessModule.newt
index bd6aacc..6b46fbf 100644
--- a/src/Lib/ProcessModule.newt
+++ b/src/Lib/ProcessModule.newt
@@ -63,11 +63,8 @@ importHints (entry :: entries) = do
 processModule : FC → FileSource → List String → List String → M String
 processModule importFC repo stk modns = do
   top <- getTop
-  -- let modns = (snoc ns nm)
   let name = joinBy "." modns
   let (Nothing) = lookupMap modns top.modules | _ => pure ""
-  -- dummy entry for processing
-  modifyTop [modules := updateMap modns (emptyModCtx "") top.modules]
 
   let fn = joinBy "/" modns ++ ".newt"
   -- TODO now we can pass in the module name...
diff --git a/tests/Loop.newt b/tests/Loop.newt
new file mode 100644
index 0000000..c9d26cc
--- /dev/null
+++ b/tests/Loop.newt
@@ -0,0 +1,3 @@
+module Loop
+
+import Loop
diff --git a/tests/Loop.newt.fail b/tests/Loop.newt.fail
new file mode 100644
index 0000000..1a49d1b
--- /dev/null
+++ b/tests/Loop.newt.fail
@@ -0,0 +1,2 @@
+*** Process tests/Loop.newt
+ERROR at tests/Loop.newt:3:8--3:12: import loop Loop → Loop