Ignore:
Timestamp:
Sep 17, 2008, 10:01:22 PM (11 years ago)
Author:
gb
Message:

xp-hacking for linuxx8632.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-1/x86-trap-support.lisp

    r10682 r10788  
    202202      5                                 ;esi
    203203      4                                 ;edi
     204      )))
     205
     206#+linuxx8632-target
     207(progn
     208  (defconstant gp-regs-offset 0)
     209  (defmacro xp-gp-regs (xp)
     210    `(pref (pref ,xp :ucontext.uc_mcontext) :mcontext_t.gregs))
     211  (defun xp-mxcsr (xp)
     212    (pref (pref (pref xp :ucontext.uc_mcontext) :mcontext_t.fpregs)
     213          :_fpstate.mxcsr))
     214  (defconstant flags-register-offset #$REG_EFL)
     215  (defconstant eip-register-offset #$REG_EIP)
     216  (defparameter *encoded-gpr-to-indexed-gpr*
     217    (vector
     218     #$REG_EAX                         ;eax
     219      #$REG_ECX                         ;ecx
     220      #$REG_EDX                         ;edx
     221      #$REG_EBX                         ;ebx
     222      #$REG_ESP                         ;esp
     223      #$REG_EBP                         ;ebp
     224      #$REG_ESI                         ;esi
     225      #$REG_EDI                         ;edi
    204226      )))
    205227
Note: See TracChangeset for help on using the changeset viewer.