blob: 8bc05daab2c5740a9239e74d3e3eed3f7b1698b3 (
plain)
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
26
27
28
29
30
31
32
33
|
.macro enter x
mov \x, %rbp
jmp *(%rbp)
.endm
.macro cell x
.quad \x
.endm
.macro continue
mov %rsi, %rax
mov %rbp, %rsi
enter %rax
.endm
.macro thunkenv arg, dest
mov (8*(\arg+2))(%rbp), \dest
.endm
.macro enter_thunkenv arg
mov (8*(\arg+2))(%rbp), %rbp
jmp *(%rbp)
.endm
.macro .makethunk name
.align 8
\name\()_info:
cell THU_evacuate
cell THU_scavenge
cell 0
\name:
.endm
|
