summaryrefslogtreecommitdiffstats
path: root/stdlib/optimize.tl
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/optimize.tl')
-rw-r--r--stdlib/optimize.tl3
1 files changed, 3 insertions, 0 deletions
diff --git a/stdlib/optimize.tl b/stdlib/optimize.tl
index ff256db7..8bf8b8c9 100644
--- a/stdlib/optimize.tl
+++ b/stdlib/optimize.tl
@@ -85,6 +85,9 @@
(mapdo (do set [bb.hash @1.label] @1) bb.list))
bb.(link-graph))
+ (:method num-blocks (bb)
+ (len bb.list))
+
(:method get-insns (bb)
[mappend .insns bb.list])