1 .xdef calloc 2 3.text 4calloc: 5 mulu.w %d1,%d0 6 move.l %d0,-(%sp) 7 move.l 0xC8,%a0 8 move.l 648(%a0),%a0 /* HeapAllocPtr */ 9 jsr (%a0) 10 move.l %a0,%d0 11 jbeq .L__calloc_1 12 clr.w -(%sp) 13 move.l %a0,-(%sp) 14 move.l 0xC8,%a0 15 move.l 2544(%a0),%a0 /* memset */ 16 jsr (%a0) 17 addq.l #6,%sp 18 jbra .L__calloc_2 19.L__calloc_1: 20 suba.l %a0,%a0 21.L__calloc_2: 22 addq.l #4,%sp 23 rts 24