on master help sign in
Fix code gen of top-level cyclic values
a5a5196Evan Czaplicki
src/Optimize/Module.hs+1−1
@@ -352,7 +352,7 @@ addRecDef home dummyName cycle state@(State values graph) def =
352 _ ->
352 _ ->
353 let
353 let
354 (deps, fields, odef) =
354 (deps, fields, odef) =
355− Names.run (Expr.optimizePotentialTailCall Set.empty def)
355+ Names.run (Expr.optimizePotentialTailCall cycle def)
356 in
356 in
357 pure $ State values $
357 pure $ State values $
358 case odef of
358 case odef of