"new" word.

thun/asm-dump.txt

@@ -5,7 +5,7 @@ label(A),
 mov_imm(0, 0),
 store_word(0, 0, 0),
 mov_imm(0, 4096),
-mov_imm(1, I1),
+mov_imm(1, J1),
 mov_imm(2, 0),
 mov_imm(3, 0),
 store_word(2, 0, 0),
@@ -186,6 +186,11 @@ ior(6, 6, 7),
 store_word(6, 0, 0),
 do_offset(H),
 label(I1),
+symbol(I1),
+mov_imm(5, 0),
+do_offset(D),
+label(J1),
+expr_cell(I1, 4),
 expr_cell(R, 4),
 expr_cell(J, 4),
 expr_cell(S, 0)].