Avoid duplication in Nockma code generation

src/Juvix/Compiler/Core/Pipeline.hs

@@ -26,7 +26,7 @@ toVampIR :: (Members '[Error JuvixError, Reader EntryPoint] r) => Module -> Sem
 toVampIR = mapReader fromEntryPoint . applyTransformations toVampIRTransformations
 
 extraAnomaTransformations :: [TransformationId]
-extraAnomaTransformations = [ComputeCaseANF]
+extraAnomaTransformations = []
 
 applyExtraTransformations :: (Members '[Error JuvixError, Reader EntryPoint] r) => [TransformationId] -> Module -> Sem r Module
 applyExtraTransformations transforms = mapReader fromEntryPoint . applyTransformations transforms

src/Juvix/Compiler/Nockma/Anoma.hs

@@ -16,9 +16,9 @@ anomaCallTuple = \case
     helper replaceArgs =
       opCall
         "anomaCall"
-        (closurePath WrapperCode)
-        (repArgs (OpAddress # emptyPath))
+        (closurePath FunCode)
+        (replArgs (OpAddress # emptyPath))
       where
-        repArgs x = case replaceArgs of
+        replArgs x = case replaceArgs of
           Nothing -> x
           Just r -> r x