diff --git a/wipforth.wat b/wipforth.wat
index a547f94..9795e1f 100644
--- a/wipforth.wat
+++ b/wipforth.wat
@@ -1539,6 +1539,24 @@
 
  ;; : IMMEDIATE? 4+ @ 128 AND 0BRANCH [12] TRUE EXIT FALSE ;
 
+ (data (i32.const 0x0a74)
+       "\48\0a\00\00"
+       "\0aIMMEDIATE?\00"
+       "\00\00\00\00"
+       "\a8\02\00\00"  ;; 4+
+       "\cc\03\00\00"  ;; @
+       "\18\04\00\00"  ;; LIT
+       "\80\00\00\00"  ;; 128
+       "\8c\03\00\00"  ;; AND
+       "\b4\04\00\00"  ;; 0BRANCH
+       "\0c\00\00\00"  ;; 12
+       "\34\05\00\00"  ;; TRUE
+       "\0c\04\00\00"  ;; EXIT
+       "\48\05\00\00"  ;; FALSE
+       "\0c\04\00\00") ;; EXIT
+
+ ;; => 0x40 bytes
+
  ;; : INTERPRET
  ;;   WORD                          \ Read a word
  ;;   DUP FIND                      \ Look it up