diff options
| author | Kartik Agaram <vc@akkartik.com> | 2020-06-27 14:30:07 -0700 |
|---|---|---|
| committer | Kartik Agaram <vc@akkartik.com> | 2020-06-27 14:30:07 -0700 |
| commit | ab42709e144fd435df08bd45678f3422feb3eb70 (patch) | |
| tree | 321b636fa6ab6d11a5c867fda9b19f73bf2c2fa3 | |
| parent | 14d9b566686d98affddb65a5bb197d6679b4383a (diff) | |
| download | mu-ab42709e144fd435df08bd45678f3422feb3eb70.tar.gz | |
6577
| -rwxr-xr-x | apps/mu | bin | 323711 -> 323711 bytes | |||
| -rw-r--r-- | apps/mu.subx | 24 |
2 files changed, 12 insertions, 12 deletions
diff --git a/apps/mu b/apps/mu index 2e5070a3..554534f7 100755 --- a/apps/mu +++ b/apps/mu Binary files differdiff --git a/apps/mu.subx b/apps/mu.subx index 8cb7ffc5..a3a8f65d 100644 --- a/apps/mu.subx +++ b/apps/mu.subx @@ -9945,6 +9945,18 @@ $has-primitive-name?:end: 5d/pop-to-ebp c3/return +check-mu-primitive: # stmt: (addr stmt), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor) + # . prologue + 55/push-ebp + 89/<- %ebp 4/r32/esp + # . save registers +$check-mu-primitive:end: + # . restore registers + # . epilogue + 89/<- %esp 5/r32/ebp + 5d/pop-to-ebp + c3/return + check-mu-call: # stmt: (addr stmt), callee: (addr function), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor) # . prologue 55/push-ebp @@ -10205,18 +10217,6 @@ $check-mu-call:end: 5d/pop-to-ebp c3/return -check-mu-primitive: # stmt: (addr stmt), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor) - # . prologue - 55/push-ebp - 89/<- %ebp 4/r32/esp - # . save registers -$check-mu-primitive:end: - # . restore registers - # . epilogue - 89/<- %esp 5/r32/ebp - 5d/pop-to-ebp - c3/return - # like type-equal? but takes literals into account type-match?: # def: (addr tree type-id), call: (addr tree type-id) -> result/eax: boolean # . prologue |