diff options
| -rw-r--r-- | 120allocate.subx | 12 | ||||
| -rw-r--r-- | 400.mu | 1 |
2 files changed, 13 insertions, 0 deletions
diff --git a/120allocate.subx b/120allocate.subx index 26d2a74b..bb4b3cb1 100644 --- a/120allocate.subx +++ b/120allocate.subx @@ -75,6 +75,18 @@ $allocate:end: 5d/pop-to-ebp c3/return +heap-bound: # -> _/eax: int + # . prologue + 55/push-ebp + 89/copy 3/mod/direct 5/rm32/ebp . . . 4/r32/esp . . # copy esp to ebp + # + 8b/copy 0/mod/indirect 5/rm32/.disp32 . . 0/r32/eax Heap/disp32 . # copy *Heap to eax +$heap-bound:end: + # . epilogue + 89/copy 3/mod/direct 4/rm32/esp . . . 5/r32/ebp . . # copy ebp to esp + 5d/pop-to-ebp + c3/return + # Claim the next 'n' bytes of memory starting at ad->curr and update ad->curr. # Abort if there isn't enough memory in 'ad'. allocate-raw: # ad: (addr allocation-descriptor), n: int, out: (addr handle _) diff --git a/400.mu b/400.mu index d1143ea8..7eba6f46 100644 --- a/400.mu +++ b/400.mu @@ -38,6 +38,7 @@ sig turn-on-debug-print sig turn-off-debug-print sig abort e: (addr array byte) sig dump-call-stack +sig heap-bound -> _/eax: int sig count-event sig count-of-events -> _/eax: int |