diff --git a/src/compile.c b/src/compile.c
index 75929aa9..6592b97e 100644
--- a/src/compile.c
+++ b/src/compile.c
@@ -503,7 +503,7 @@ block block_drop_unreferenced(block body) {
     if (curr->bound_by == curr && !curr->referenced) {
       inst_free(curr);
     } else {
-      refd = BLOCK(inst_block(curr), refd);
+      refd = BLOCK(refd, inst_block(curr));
     }
   }
   return refd;