basis/cpu/x86/unix/bootstrap.factor

   1 ! Copyright (C) 2010 Slava Pestov.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: cpu.x86.assembler cpu.x86.assembler.operands kernel
   4 layouts ;
   5 IN: bootstrap.x86
   6
   7 DEFER: stack-reg
   8
   9 : jit-save-tib ( -- ) ;
  10 : jit-restore-tib ( -- ) ;
  11 : jit-update-tib ( ctx-reg -- ) drop ;
  12 : jit-install-seh ( -- ) stack-reg bootstrap-cell ADD ;
  13 : jit-update-seh ( ctx-reg -- ) drop ;