diff --git a/module/mescc/armv4/as.scm b/module/mescc/armv4/as.scm
index 196dffa8..81cf6cbf 100644
--- a/module/mescc/armv4/as.scm
+++ b/module/mescc/armv4/as.scm
@@ -71,7 +71,7 @@
     `((,(string-append "add____%" r1 ",%" r0)))))
 
 (define (armv4:call-label info label n)
-  `((bl (#:offset2 ,label))
+  `(((#:offset3 ,label) bl)
     ("add____$i8,%esp" (#:immediate1 ,(* n 4)))))
 
 (define (armv4:r->arg info i)