312copy.subx

   1 == code
   2
   3 copy-array-object:  # src: (addr array T), dest-ah: (addr handle array T)
   4     # . prologue
   5     55/push-ebp
   6     89/<- %ebp 4/r32/esp
   7     #
   8     (copy-array Heap *(ebp+8) *(ebp+0xc))
   9 $copy-array-object:end:
  10     # . epilogue
  11     89/<- %esp 5/r32/ebp
  12     5d/pop-to-ebp
  13     c3/return