don't eliminate dead code in library mode but do keep doing it otherwise

iu-parfunc · Jul 17, 2024 · cae17fc · cae17fc
1 parent 92e90f9
commit cae17fc
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/gibbon-compiler/src/Gibbon/Passes/Simplifier.hs b/gibbon-compiler/src/Gibbon/Passes/Simplifier.hs
@@ -93,8 +93,10 @@ simplifyL1 p0 = do
     p0' <- freshNames1 p0
     p1 <- markRecFns p0'
     p2 <- inlineFuns p1
-    -- p3 <- deadFunElim p2
-    pure p2
+    Config{mode} <- ask
+    if isLibrary mode
+      then pure p2
+      else deadFunElim p2
 
 --------------------------------------------------------------------------------