steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
factor/vm/os-linux-x86.64.hpp

37 lines
1.2 KiB
C++
Raw Normal View History

Porting VM to C++
2009-05-02 05:04:19 -04:00
#include <ucontext.h>
VM: Refactor os-* to Factor style
2013-05-11 22:24:31 -04:00
namespace factor {
inline static unsigned int uap_fpu_status(void* uap) {
ucontext_t* ucontext = (ucontext_t*)uap;
return ucontext->uc_mcontext.fpregs->swd |
ucontext->uc_mcontext.fpregs->mxcsr;
save the FP status out of the signal context and use it as part of the fp trap factor exception. clear the FP status before continuing after an exception
2009-09-14 00:37:28 -04:00
}
VM: Refactor os-* to Factor style
2013-05-11 22:24:31 -04:00
inline static void uap_clear_fpu_status(void* uap) {
ucontext_t* ucontext = (ucontext_t*)uap;
ucontext->uc_mcontext.fpregs->swd = 0;
ucontext->uc_mcontext.fpregs->mxcsr &= 0xffffffc0;
save the FP status out of the signal context and use it as part of the fp trap factor exception. clear the FP status before continuing after an exception
2009-09-14 00:37:28 -04:00
}
VM: Refactor os-* to Factor style
2013-05-11 22:24:31 -04:00
#define UAP_STACK_POINTER(ucontext) \
(((ucontext_t*)ucontext)->uc_mcontext.gregs[15])
#define UAP_PROGRAM_COUNTER(ucontext) \
(((ucontext_t*)ucontext)->uc_mcontext.gregs[16])
VM: Fixup cast formatting after clang-format clang-format doesn't recognize casts to non-pointer/non-template types so it winds up adding a space between the right paren and the expression and then failing to recognize prefix operators in the process (e.g. foo = (cell) & bar; should be foo = (cell)&bar;). This commit manually fixes up the major cases (fixnum, cell, all types ending in _t).
2013-05-13 00:53:47 -04:00
#define UAP_SET_TOC_POINTER(uap, ptr) (void)0
Use C++ namespaces
2009-05-04 02:46:13 -04:00
VM: Fixup cast formatting after clang-format clang-format doesn't recognize casts to non-pointer/non-template types so it winds up adding a space between the right paren and the expression and then failing to recognize prefix operators in the process (e.g. foo = (cell) & bar; should be foo = (cell)&bar;). This commit manually fixes up the major cases (fixnum, cell, all types ending in _t).
2013-05-13 00:53:47 -04:00
#define CODE_TO_FUNCTION_POINTER(code) (void)0
#define CODE_TO_FUNCTION_POINTER_CALLBACK(vm, code) (void)0
32 and 64 bit Linux PPC support
2011-05-20 18:11:50 -04:00
#define FUNCTION_CODE_POINTER(ptr) ptr
#define FUNCTION_TOC_POINTER(ptr) ptr
#define UAP_STACK_POINTER_TYPE greg_t
vm: store stack frame size in code blocks Change modify-code-heap primitive so it takes a sixth element in each array for the frame size.
2011-11-25 21:58:21 -05:00
vm: frame size for signal handler code blocks
2011-11-30 15:39:21 -05:00
/* Must match the leaf-stack-frame-size, signal-handler-stack-frame-size,
and stack-frame-size constants in basis/cpu/x86/64/unix/bootstrap.factor */
simplify function prologs
2011-12-13 18:13:32 -05:00
static const unsigned LEAF_FRAME_SIZE = 16;
cpu.x86.*: clean up signal handler prolog code Also bump the signal handler frame sizes up again since it looks like we shrank them too much.
2011-12-13 22:31:59 -05:00
static const unsigned SIGNAL_HANDLER_STACK_FRAME_SIZE = 160;
vm: store stack frame size in code blocks Change modify-code-heap primitive so it takes a sixth element in each array for the frame size.
2011-11-25 21:58:21 -05:00
static const unsigned JIT_FRAME_SIZE = 32;
Use C++ namespaces
2009-05-04 02:46:13 -04:00
}