steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
factor/basis/bootstrap/assembler/x86.32.windows.factor

39 lines
1.3 KiB
Factor
Raw Normal View History

Get green threads working on Windows - store stack base and limit in TIB - set up a frame-based structured exception handler in each context's callstack - boot.x86.32.image has now been replaced by boot.winnt-x86.32.image and boot.unix-x86.32.image
2010-04-03 20:24:33 -04:00
! Copyright (C) 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
VM: give the exception handling special object a real name
2015-08-30 06:44:33 -04:00
USING: compiler.codegen.relocation compiler.constants cpu.x86.assembler
cpu.x86.assembler.operands kernel kernel.private layouts locals parser
sequences ;
Get green threads working on Windows - store stack base and limit in TIB - set up a frame-based structured exception handler in each context's callstack - boot.x86.32.image has now been replaced by boot.winnt-x86.32.image and boot.unix-x86.32.image
2010-04-03 20:24:33 -04:00
IN: bootstrap.x86
Store stack bounds in TIB on win64 to make C++ exceptions work
2010-04-05 19:06:51 -04:00
: tib-segment ( -- ) FS ;
: tib-temp ( -- reg ) EAX ;
Get green threads working on Windows - store stack base and limit in TIB - set up a frame-based structured exception handler in each context's callstack - boot.x86.32.image has now been replaced by boot.winnt-x86.32.image and boot.unix-x86.32.image
2010-04-03 20:24:33 -04:00
Reorganising bootstrap files All the bootstrap.factor scripts in cpu/ are run by the bootstrap to make boot images, but aren't used otherwise. So I think it's cleaner to put them in one directory inside the bootstrap hierarchy.
2015-05-17 04:11:48 -04:00
<< "vocab:bootstrap/assembler/x86.windows.factor" parse-file suffix! >> call
Get green threads working on Windows - store stack base and limit in TIB - set up a frame-based structured exception handler in each context's callstack - boot.x86.32.image has now been replaced by boot.winnt-x86.32.image and boot.unix-x86.32.image
2010-04-03 20:24:33 -04:00
: jit-install-seh ( -- )
VM: get rid of the odd RT_EXCEPTION_HANDLER relocation The address to the win32 relocation handler can be stored in a special object and be accessed by jit-install-seh. Doing it that way is better because you can remove a lot of special code related to that relocation type.
2015-08-30 06:21:20 -04:00
! VM pointer must be in vm-reg already
Get green threads working on Windows - store stack base and limit in TIB - set up a frame-based structured exception handler in each context's callstack - boot.x86.32.image has now been replaced by boot.winnt-x86.32.image and boot.unix-x86.32.image
2010-04-03 20:24:33 -04:00
! Create a new exception record and store it in the TIB.
Store stack bounds in TIB on win64 to make C++ exceptions work
2010-04-05 19:06:51 -04:00
! Clobbers tib-temp.
Get green threads working on Windows - store stack base and limit in TIB - set up a frame-based structured exception handler in each context's callstack - boot.x86.32.image has now been replaced by boot.winnt-x86.32.image and boot.unix-x86.32.image
2010-04-03 20:24:33 -04:00
! Align stack
ESP 3 bootstrap-cells ADD
VM: give the exception handling special object a real name
2015-08-30 06:44:33 -04:00
tib-temp EBX WIN-EXCEPTION-HANDLER vm-special-object-offset [+] MOV
VM: get rid of the odd RT_EXCEPTION_HANDLER relocation The address to the win32 relocation handler can be stored in a special object and be accessed by jit-install-seh. Doing it that way is better because you can remove a lot of special code related to that relocation type.
2015-08-30 06:21:20 -04:00
tib-temp tib-temp alien-offset [+] MOV
Store stack bounds in TIB on win64 to make C++ exceptions work
2010-04-05 19:06:51 -04:00
tib-temp PUSH
VM: get rid of the odd RT_EXCEPTION_HANDLER relocation The address to the win32 relocation handler can be stored in a special object and be accessed by jit-install-seh. Doing it that way is better because you can remove a lot of special code related to that relocation type.
2015-08-30 06:21:20 -04:00
Get green threads working on Windows - store stack base and limit in TIB - set up a frame-based structured exception handler in each context's callstack - boot.x86.32.image has now been replaced by boot.winnt-x86.32.image and boot.unix-x86.32.image
2010-04-03 20:24:33 -04:00
! No next handler
0 PUSH
! This is the new exception handler
Store stack bounds in TIB on win64 to make C++ exceptions work
2010-04-05 19:06:51 -04:00
tib-exception-list-offset [] ESP tib-segment MOV ;
Get green threads working on Windows - store stack base and limit in TIB - set up a frame-based structured exception handler in each context's callstack - boot.x86.32.image has now been replaced by boot.winnt-x86.32.image and boot.unix-x86.32.image
2010-04-03 20:24:33 -04:00
:: jit-update-seh ( ctx-reg -- )
! Load exception record structure that jit-install-seh
Store stack bounds in TIB on win64 to make C++ exceptions work
2010-04-05 19:06:51 -04:00
! created from the bottom of the callstack.
! Clobbers tib-temp.
tib-temp ctx-reg context-callstack-bottom-offset [+] MOV
tib-temp bootstrap-cell ADD
Get green threads working on Windows - store stack base and limit in TIB - set up a frame-based structured exception handler in each context's callstack - boot.x86.32.image has now been replaced by boot.winnt-x86.32.image and boot.unix-x86.32.image
2010-04-03 20:24:33 -04:00
! Store exception record in TIB.
Store stack bounds in TIB on win64 to make C++ exceptions work
2010-04-05 19:06:51 -04:00
tib-exception-list-offset [] tib-temp tib-segment MOV ;
Get green threads working on Windows - store stack base and limit in TIB - set up a frame-based structured exception handler in each context's callstack - boot.x86.32.image has now been replaced by boot.winnt-x86.32.image and boot.unix-x86.32.image
2010-04-03 20:24:33 -04:00
Reorganising bootstrap files All the bootstrap.factor scripts in cpu/ are run by the bootstrap to make boot images, but aren't used otherwise. So I think it's cleaner to put them in one directory inside the bootstrap hierarchy.
2015-05-17 04:11:48 -04:00
<< "vocab:bootstrap/assembler/x86.32.factor" parse-file suffix! >> call
<< "vocab:bootstrap/assembler/x86.factor" parse-file suffix! >> call