From 6c4d01d4c48eb0d2be5e8a73f47095c9ea9188c4 Mon Sep 17 00:00:00 2001 From: Steve Dunham Date: Wed, 11 Feb 2026 20:09:12 -0800 Subject: [PATCH] check in import loop test, remove dead code/comment --- src/Lib/ProcessModule.newt | 3 --- tests/Loop.newt | 3 +++ tests/Loop.newt.fail | 2 ++ 3 files changed, 5 insertions(+), 3 deletions(-) create mode 100644 tests/Loop.newt create mode 100644 tests/Loop.newt.fail 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