Skip to content
Snippets Groups Projects
Commit 33db9839 authored by Régis Blanc's avatar Régis Blanc
Browse files

fix a bug in unit elimination

parent 45ccabe1
No related branches found
No related tags found
No related merge requests found
......@@ -92,8 +92,10 @@ object UnitElimination extends Pass {
fun2FreshFun -= fd
(freshFunDef, restRec)
} else {
fun2FreshFun += (fd -> fd)
fd.body = Some(removeUnit(fd.getBody))
val restRec = removeUnit(b)
fun2FreshFun -= fd
(fd, restRec)
}
LetDef(newFd, rest)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment