Newt in Newt compiles (but does not run)

2025-01-04 09:26:33 -08:00
parent 46434cc555
commit 6b1eef86a7
21 changed files with 2970 additions and 91 deletions
--- a/done/Lib/Eval.newt
+++ b/done/Lib/Eval.newt
@@ -79,6 +79,11 @@ tryEval env (VRef fc k _ sp) = do
            val <- vappSpine vtm sp
            case val of
              VCase _ _ _ => pure Nothing
+              -- For now? There is a spot in Compile.newt that has
+              -- two applications of fresh that is getting unfolded even
+              -- though it has the same head and spine.  Possibly because it's
+              -- coming out of a let and is instantly applied
+              VLetRec _ _ _ _ _ => pure Nothing
              v => pure $ Just v)
            (\ _ => pure Nothing)
      _ => pure Nothing