about summary refs log tree commit diff stats
path: root/apps/handle
diff options
context:
space:
mode:
Diffstat (limited to 'apps/handle')
-rwxr-xr-xapps/handlebin33734 -> 33734 bytes
1 files changed, 0 insertions, 0 deletions
diff --git a/apps/handle b/apps/handle
index da5e3613..bfe24eaf 100755
--- a/apps/handle
+++ b/apps/handle
Binary files differ
020-07-28 21:37:32 -0700 6682 - experimental support for streams and slices' href='/akkartik/mu/commit/308allocate-array.subx?h=main&id=b8df5340fa55f79fd544ab130da4052ed88aca4f'>b8df5340 ^
5e0ae917 ^




15b98801 ^
5e0ae917 ^

ae470b42 ^
15b98801 ^
5e0ae917 ^


15b98801 ^
5e0ae917 ^




1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
                                  
                                                                   
 

       
                                                                                                                




                        
               

                              
                                                
                                  


                                              
                 




                        
# 2-arg version of allocate-array.
# Really only intended to be called from code generated by mu.subx.

== code

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