diff --git a/user-side-compiler/middle/compile-node-to-ir.lisp b/user-side-compiler/middle/compile-node-to-ir.lisp
index 3e78bc6..e20a8d0 100644
--- a/user-side-compiler/middle/compile-node-to-ir.lisp
+++ b/user-side-compiler/middle/compile-node-to-ir.lisp
@@ -77,7 +77,7 @@
     output))
 
 (defmethod compile-node ((node node-conditional) builder)
-  (let* ((test-ir (the ir-result (compile-node (test-node node) builder)))
+  (let* ((test-ir (the ir-data (compile-node (test-node node) builder)))
          (else-exists-p (not (null (else-node node))))
          (then-iblock (make-instance 'iblock :name "then"))
          (else-iblock (make-instance 'iblock :name "else"))