about summary refs log tree commit diff stats
path: root/308allocate-array.subx
blob: 7040106cda9df7acf9d133243e2cecfb101b0d73 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
# 2-arg version of allocate-array.

allocate-array2:  # ad: (addr allocation-descriptor), elem-size: int, array-len: int, out: (addr handle array _)
    # . prologue
    55/push-ebp
    89/<- %ebp 4/r32/esp
    # . save registers
    50/push-eax
    #
    8b/-> *(ebp+0xc) 0/r32/eax
    f7 4/subop/multiply-into 0/r32/eax *(ebp+0x10)
    (allocate-array *(ebp+8) %eax *(ebp+0x14))
$allocate-array2:end:
    # . restore registers
    58/pop-to-eax
    # . epilogue
    89/<- %esp 5/r32/ebp
    5d/pop-to-ebp
    c3/return