add a proper block deletion routine

1 files changed, 1 insertions, 1 deletions

diff --git a/ssa.c b/ssa.c
index 201f22c..77c6258 100644
--- a/ssa.c
+++ b/ssa.c
@@ -161,8 +161,8 @@ fillrpo(Fn *f)
 	for (p=&f->start; *p;) {
 		b = *p;
 		if (b->id == -1) {
+			blkdel(b);
 			*p = b->link;
-			/* todo, free block */
 		} else {
 			b->id -= n;
 			f->rpo[b->id] = b;