basis/cpu/x86/64/bootstrap.factor

   1 ! Copyright (C) 2007 Slava Pestov.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: bootstrap.image.private kernel namespaces system
   4 cpu.x86.assembler layouts vocabs parser ;
   5 IN: bootstrap.x86
   6
   7 8 \ cell set
   8
   9 : arg0 ( -- reg ) RDI ;
  10 : arg1 ( -- reg ) RSI ;
  11 : temp-reg ( -- reg ) RBX ;
  12 : stack-reg ( -- reg ) RSP ;
  13 : ds-reg ( -- reg ) R14 ;
  14 : rs-reg ( -- reg ) R15 ;
  15 : fixnum>slot@ ( -- ) ;
  16 : rex-length ( -- n ) 1 ;
  17
  18 << "resource:basis/cpu/x86/bootstrap.factor" parse-file parsed >>
  19 call