Untitled diff
37 removals
140 lines
43 additions
146 lines
section .text
section .text
global scheme_entry
global scheme_entry
fXX04:
fXX04:
mov rax, [rsp+(-8)]
mov rax, [rsp+(-8)]
mov [rsp+(-40)], rax
mov [rsp+(-24)], rax
mov rax, [rsp+(-16)]
mov rax, [rsp+(-16)]
mov [rsp+(-48)], rax
mov [rsp+(-32)], rax
mov rax, [rsi+(8)]
mov rax, [rsi+(8)]
mov [rsp+(-56)], rax
mov [rsp+(-40)], rax
mov rax, [rsp+(-8)]
mov rax, [rsp+(-8)]
sub rax, 6
sub rax, 6
lea rsp, [rsp+(-16)]
push rsi
mov rsi, rax
mov rsi, rax
mov rax, [rax]
mov rax, [rax]
call rax
mov rbx, [rsp+(-24)]
pop rdi
mov [rsp+(-8)], rbx
lea rsp, [rsp-(-16)]
mov rbx, [rsp+(-32)]
mov [rsp+(-16)], rbx
mov rbx, [rsp+(-40)]
mov [rsp+(-24)], rbx
jmp rax
ret
ret
fXX15:
fXX15:
mov rax, 0
mov rax, 0
mov [rsp+(-32)], rax
mov [rsp+(-32)], rax
mov rax, [rsp+(-24)]
mov rax, [rsp+(-24)]
L10:
L10:
cmp rax, [rsp+(-32)]
cmp rax, [rsp+(-32)]
jne .L0
jne .L0
mov rax, 159
mov rax, 159
jmp .L1
jmp .L1
.L0:
.L0:
mov rax, 31
mov rax, 31
.L1:
.L1:
cmp rax, 31
cmp rax, 31
je L8
je L8
mov rax, 159
mov rax, 159
jmp L9
jmp L9
L8:
L8:
mov rax, [rsp+(-8)]
mov rax, [rsp+(-8)]
mov [rsp+(-48)], rax
mov [rsp+(-32)], rax
mov rax, [rsp+(-16)]
mov rax, [rsp+(-16)]
mov [rsp+(-56)], rax
mov [rsp+(-40)], rax
mov rax, 4
mov rax, 4
mov [rsp+(-64)], rax
mov [rsp+(-48)], rax
mov rax, [rsp+(-24)]
mov rax, [rsp+(-24)]
sub rax, [rsp+(-64)]
sub rax, [rsp+(-48)]
mov [rsp+(-64)], rax
mov [rsp+(-48)], rax
mov rax, [rsp+(-16)]
mov rax, [rsp+(-16)]
sub rax, 6
sub rax, 6
lea rsp, [rsp+(-24)]
push rsi
mov rsi, rax
mov rsi, rax
mov rax, [rax]
mov rax, [rax]
call rax
mov rbx, [rsp+(-32)]
pop rdi
mov [rsp+(-8)], rbx
lea rsp, [rsp-(-24)]
mov rbx, [rsp+(-40)]
mov [rsp+(-16)], rbx
mov rbx, [rsp+(-48)]
mov [rsp+(-24)], rbx
jmp rax
L9:
L9:
ret
ret
fXX26:
fXX26:
mov rax, 0
mov rax, 0
mov [rsp+(-32)], rax
mov [rsp+(-32)], rax
mov rax, [rsp+(-24)]
mov rax, [rsp+(-24)]
L13:
L13:
cmp rax, [rsp+(-32)]
cmp rax, [rsp+(-32)]
jne .L0
jne .L0
mov rax, 159
mov rax, 159
jmp .L1
jmp .L1
.L0:
.L0:
mov rax, 31
mov rax, 31
.L1:
.L1:
cmp rax, 31
cmp rax, 31
je L11
je L11
mov rax, 31
mov rax, 31
jmp L12
jmp L12
L11:
L11:
mov rax, [rsp+(-8)]
mov rax, [rsp+(-8)]
mov [rsp+(-48)], rax
mov [rsp+(-32)], rax
mov rax, [rsp+(-16)]
mov rax, [rsp+(-16)]
mov [rsp+(-56)], rax
mov [rsp+(-40)], rax
mov rax, 4
mov rax, 4
mov [rsp+(-64)], rax
mov [rsp+(-48)], rax
mov rax, [rsp+(-24)]
mov rax, [rsp+(-24)]
sub rax, [rsp+(-64)]
sub rax, [rsp+(-48)]
mov [rsp+(-64)], rax
mov [rsp+(-48)], rax
mov rax, [rsp+(-8)]
mov rax, [rsp+(-8)]
sub rax, 6
sub rax, 6
lea rsp, [rsp+(-24)]
push rsi
mov rsi, rax
mov rsi, rax
mov rax, [rax]
mov rax, [rax]
call rax
mov rbx, [rsp+(-32)]
pop rdi
mov [rsp+(-8)], rbx
lea rsp, [rsp-(-24)]
mov rbx, [rsp+(-40)]
mov [rsp+(-16)], rbx
mov rbx, [rsp+(-48)]
mov [rsp+(-24)], rbx
jmp rax
L12:
L12:
ret
ret
fXX37:
fXX37:
mov rax, fXX15
mov rax, fXX15
mov [rdi], rax
mov [rdi], rax
mov rax, rdi
mov rax, rdi
or rax, 6
or rax, 6
add rdi, 8
add rdi, 8
mov [rsp+(-32)], rax
mov [rsp+(-16)], rax
mov rax, fXX26
mov rax, fXX26
mov [rdi], rax
mov [rdi], rax
mov rax, rdi
mov rax, rdi
or rax, 6
or rax, 6
add rdi, 8
add rdi, 8
mov [rsp+(-40)], rax
mov [rsp+(-24)], rax
mov rax, fXX04
mov rax, fXX04
mov [rdi], rax
mov [rdi], rax
mov rax, rdi
mov rax, rdi
or rax, 6
or rax, 6
mov rbx, [rsp+(-8)]
mov rbx, [rsp+(-8)]
mov [rdi+(8)], rbx
mov [rdi+(8)], rbx
add rdi, 16
add rdi, 16
sub rax, 6
sub rax, 6
lea rsp, [rsp+(-8)]
push rsi
mov rsi, rax
mov rsi, rax
mov rax, [rax]
mov rax, [rax]
call rax
mov rbx, [rsp+(-16)]
pop rdi
mov [rsp+(-8)], rbx
lea rsp, [rsp-(-8)]
mov rbx, [rsp+(-24)]
mov [rsp+(-16)], rbx
jmp rax
ret
ret
scheme_entry:
scheme_entry:
mov rax, 40
mov rax, 40
mov [rsp+(-24)], rax
mov [rsp+(-24)], rax
mov rax, fXX37
mov rax, fXX37
mov [rdi], rax
mov [rdi], rax
mov rax, rdi
mov rax, rdi
or rax, 6
or rax, 6
add rdi, 8
add rdi, 8
sub rax, 6
sub rax, 6
lea rsp, [rsp+(0)]
lea rsp, [rsp+(0)]
push rsi
push rsi
mov rsi, rax
mov rsi, rax
mov rax, [rax]
mov rax, [rax]
call rax
call rax
pop rdi
pop rdi
lea rsp, [rsp-(0)]
lea rsp, [rsp-(0)]
ret
ret