Clean up Windows support
parent
92fef17698
commit
b23e109447
2
Makefile
2
Makefile
|
@ -11,7 +11,7 @@ CFLAGS = -Wall
|
||||||
ifdef DEBUG
|
ifdef DEBUG
|
||||||
CFLAGS += -g
|
CFLAGS += -g
|
||||||
else
|
else
|
||||||
CFLAGS += -O3 $(SITE_CFLAGS)
|
CFLAGS += -O3 -fomit-frame-pointer $(SITE_CFLAGS)
|
||||||
endif
|
endif
|
||||||
|
|
||||||
ifdef CONFIG
|
ifdef CONFIG
|
||||||
|
|
|
@ -66,6 +66,7 @@ M: x86-backend %prepare-alien-invoke
|
||||||
#! all roots.
|
#! all roots.
|
||||||
"stack_chain" f temp-reg v>operand %alien-global
|
"stack_chain" f temp-reg v>operand %alien-global
|
||||||
temp-reg v>operand [] stack-reg MOV
|
temp-reg v>operand [] stack-reg MOV
|
||||||
|
temp-reg v>operand [] cell SUB
|
||||||
temp-reg v>operand 2 cells [+] ds-reg MOV
|
temp-reg v>operand 2 cells [+] ds-reg MOV
|
||||||
temp-reg v>operand 3 cells [+] rs-reg MOV ;
|
temp-reg v>operand 3 cells [+] rs-reg MOV ;
|
||||||
|
|
||||||
|
|
|
@ -1,7 +1,3 @@
|
||||||
#ifndef DEBUG
|
|
||||||
C_FLAGS += -fomit-frame-pointer
|
|
||||||
#endif
|
|
||||||
|
|
||||||
EXE_SUFFIX =
|
EXE_SUFFIX =
|
||||||
DLL_PREFIX = lib
|
DLL_PREFIX = lib
|
||||||
DLL_EXTENSION = .a
|
DLL_EXTENSION = .a
|
||||||
|
|
|
@ -44,6 +44,3 @@ DEF(void,set_callstack,(F_STACK_FRAME *to, F_STACK_FRAME *from, CELL length, voi
|
||||||
ret /* return _with new stack_ */
|
ret /* return _with new stack_ */
|
||||||
|
|
||||||
#include "cpu-x86.S"
|
#include "cpu-x86.S"
|
||||||
|
|
||||||
.section .drectve
|
|
||||||
.ascii " -export:set_callstack"
|
|
||||||
|
|
|
@ -36,6 +36,3 @@ DEF(void,set_callstack,(F_STACK_FRAME *to, F_STACK_FRAME *from, CELL length, voi
|
||||||
ret /* return _with new stack_ */
|
ret /* return _with new stack_ */
|
||||||
|
|
||||||
#include "cpu-x86.S"
|
#include "cpu-x86.S"
|
||||||
|
|
||||||
.section .drectve
|
|
||||||
.ascii " -export:set_callstack"
|
|
||||||
|
|
12
vm/cpu-x86.S
12
vm/cpu-x86.S
|
@ -64,11 +64,7 @@ DEF(FASTCALL void,lazy_jit_compile,(CELL quot)):
|
||||||
pop XT_REG
|
pop XT_REG
|
||||||
JUMP_QUOT /* Call the quotation */
|
JUMP_QUOT /* Call the quotation */
|
||||||
|
|
||||||
.section .drectve
|
#ifdef WINDOWS
|
||||||
.ascii " -export:c_to_factor"
|
.section .drectve
|
||||||
.ascii " -export:undefined"
|
.ascii " -export:c_to_factor"
|
||||||
.ascii " -export:docol_profiling"
|
#endif
|
||||||
.ascii " -export:primitive_call"
|
|
||||||
.ascii " -export:primitive_execute"
|
|
||||||
.ascii " -export:throw_impl"
|
|
||||||
.ascii " -export:lazy_jit_compile"
|
|
||||||
|
|
Loading…
Reference in New Issue