1         .module wc_nork
                                      2         .area _CODE
                         00006006     3 WC_ENTRY = 0x6006
                                      4         .globl _wc_nork
    00000000                          5 _wc_nork::
    00000000 DD E5            [15]    6         push    ix
    00000002 DD 21 00 00      [14]    7         ld      ix, #0
    00000006 DD 39            [15]    8         add     ix, sp
    00000008 DD 7E 04         [19]    9         ld      a, 4(ix)                ; A = val (from stack)
    0000000B 08               [ 4]   10         ex      af, af'                 ; A' = val
                                     11         ; HL = addr (1st arg, already in HL)
    0000000C 3E 0A            [ 7]   12         ld      a, #0x0A
    0000000E CD 06 60         [17]   13         call    WC_ENTRY
    00000011 DD E1            [14]   14         pop     ix
                                     15         ; callee cleans 1 byte (val)
    00000013 E1               [10]   16         pop     hl
    00000014 33               [ 6]   17         inc     sp
    00000015 E9               [ 4]   18         jp      (hl)