Definitions.

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, S1),
+mov_imm(1, B2),
 mov_imm(2, 0),
 mov_imm(3, 0),
 store_word(2, 0, 0),
@@ -243,8 +243,47 @@ ior(9, 9, 6),
 store_word(9, 0, 0),
 do_offset(H),
 label(S1),
+symbol(S1),
+mov_imm(2, T1),
+do_offset(V1),
+label(T1),
+expr_cell(I1, 4),
+expr_cell(J, 0),
+label(U1),
+symbol(U1),
+mov_imm(2, W1),
+do_offset(V1),
+label(W1),
+expr_cell(R, 4),
+expr_cell(S, 0),
+label(X1),
+symbol(X1),
+mov_imm(2, Y1),
+do_offset(V1),
+label(Y1),
+expr_cell(J1, 4),
+expr_cell(J, 0),
+label(V1),
+mov_imm(7, 4),
+sub_imm(0, 0, 4),
+sub_imm(2, 2, 0),
+eq_offset(Z1),
+sub(2, 2, 0),
+and_imm(2, 2, 32767),
+label(Z1),
+sub_imm(7, 7, 0),
+eq_offset(A2),
+sub(7, 7, 0),
+and_imm(7, 7, 32767),
+label(A2),
+lsl_imm(2, 2, 15),
+ior(2, 2, 7),
+store_word(2, 0, 0),
+mov_imm(7, S),
+add_imm(7, 7, 4),
+do(7),
+label(B2),
 expr_cell(I1, 4),
 expr_cell(R, 4),
-expr_cell(J1, 4),
-expr_cell(J, 4),
+expr_cell(X1, 4),
 expr_cell(S, 0)].