diff --git a/wipforth.wat b/wipforth.wat
index dc3ef37..d669bad 100644
--- a/wipforth.wat
+++ b/wipforth.wat
@@ -638,10 +638,10 @@
  (func $zbranch
 	   call $pop
 	   if (result i32)
+	   i32.const 4
+	   else
 	   global.get $ip
 	   i32.load
-	   else
-	   i32.const 4
 	   end
 	   global.get $ip
 	   i32.add