• Top
  • Documentation
  • Books
  • Recursion-and-induction
  • Boolean-reasoning
  • Projects
  • Debugging
  • Std
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
  • Hardware-verification
  • Software-verification
    • Kestrel-books
    • X86isa
      • Program-execution
      • Introduction
      • X86isa-build-instructions
      • Publications
      • Contributors
      • Machine
        • Syscalls
        • Cpuid
        • X86isa-state
        • Linear-memory
        • Rflag-specifications
        • Characterizing-undefined-behavior
        • Top-level-memory
        • App-view
        • X86-decoder
          • Get-prefixes
          • Vex-0f3a-execute
          • Vex-0f38-execute
          • Vex-0f-execute
          • Two-byte-opcode-execute
          • Second-three-byte-opcode-execute
          • One-byte-opcode-execute
          • First-three-byte-opcode-execute
          • Evex-0f3a-execute
          • Evex-0f38-execute
          • Evex-0f-execute
          • X86-fetch-decode-execute
          • Vex-decode-and-execute
          • Evex-decode-and-execute
          • Opcode-maps
          • X86-run
          • Implemented-opcodes
          • Three-byte-opcode-decode-and-execute
          • X86-run-halt-count
          • Two-byte-opcode-decode-and-execute
          • X86-run-steps
          • X86-fetch-decode-execute-halt
          • X86-run-halt
          • X86-run-steps1
        • Physical-memory
        • Decoding-and-spec-utils
        • Instructions
        • X86-modes
        • Segmentation
        • Register-readers-and-writers
        • Other-non-deterministic-computations
        • Environment
        • Paging
      • Implemented-opcodes
      • Proof-utilities
      • To-do
      • Concrete-simulation-examples
      • Model-validation
      • Utils
      • Debugging-code-proofs
    • Execloader
    • Axe
  • Testing-utilities
  • Math

• X86-decoder

Two-byte-opcode-execute

Two-byte opcode dispatch function.

Signature

(two-byte-opcode-execute proc-mode start-rip 
                         temp-rip prefixes mandatory-prefix 
                         rex-byte opcode modr/m sib x86) 
 
  → 
x86

two-byte-opcode-execute is the doorway to the two-byte opcode map, and will lead to the three-byte opcode map if opcode is either #x38 or #x3A.

Definitions and Theorems

Function: two-byte-opcode-execute

(defun
 two-byte-opcode-execute
 (proc-mode start-rip
            temp-rip prefixes mandatory-prefix
            rex-byte opcode modr/m sib x86)
 (declare (xargs :stobjs (x86)))
 (declare (type (integer 0 4) proc-mode)
          (type (signed-byte 48) start-rip)
          (type (signed-byte 48) temp-rip)
          (type (unsigned-byte 52) prefixes)
          (type (unsigned-byte 8)
                mandatory-prefix)
          (type (unsigned-byte 8) rex-byte)
          (type (unsigned-byte 8) opcode)
          (type (unsigned-byte 8) modr/m)
          (type (unsigned-byte 8) sib))
 (declare (xargs :guard (and (prefixes-p prefixes)
                             (modr/m-p modr/m)
                             (sib-p sib)
                             (rip-guard-okp proc-mode temp-rip))))
 (case
  opcode
  (0
   (cond
    ((and (equal (modr/m->reg modr/m) 0)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
      ((fault-var
            (if (or (ud-lock-used))
                ':ud
                (if (or (and (gp-cpl-not-0) (gp-cr4-umip-is-1)))
                    ':gp
                    nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (if (or (ud-lock-used))
                ':ud
                (if (or (and (gp-cpl-not-0) (gp-cr4-umip-is-1)))
                    ':gp
                    nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 1)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
      ((fault-var
            (if (or (ud-lock-used))
                ':ud
                (if (or (and (gp-cpl-not-0) (gp-cr4-umip-is-1)))
                    ':gp
                    nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (if (or (ud-lock-used))
                ':ud
                (if (or (and (gp-cpl-not-0) (gp-cr4-umip-is-1)))
                    ':gp
                    nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((equal (modr/m->reg modr/m) 2)
     (let
      ((fault-var (if (or (ud-lock-used))
                      ':ud
                      (if (or (gp-cpl-not-0)) ':gp nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-lldt proc-mode start-rip temp-rip prefixes
                  rex-byte opcode modr/m sib x86))))
    ((equal (modr/m->reg modr/m) 3)
     (let
      ((fault-var (if (or (ud-lock-used))
                      ':ud
                      (if (or (gp-cpl-not-0)) ':gp nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((equal (modr/m->reg modr/m) 4)
     (let
      ((fault-var (if (or (ud-lock-used)) ':ud nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((equal (modr/m->reg modr/m) 5)
     (let
      ((fault-var (if (or (ud-lock-used)) ':ud nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (1
   (cond
    ((and (equal (modr/m->reg modr/m) 0)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
      ((fault-var
            (if (or (ud-lock-used))
                ':ud
                (if (or (and (gp-cpl-not-0) (gp-cr4-umip-is-1)))
                    ':gp
                    nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 0)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 1))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
    ((and (equal (modr/m->reg modr/m) 0)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 2))
     (let
      ((fault-var (if (or (gp-cpl-not-0)) ':gp nil)))
      (if
         fault-var
         (case fault-var
               (:gp (x86-general-protection "#GP Encountered!"
                                            start-rip temp-rip x86))
               (t (x86-step-unimplemented
                       "Unimplemented exception in x86isa!"
                       x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (equal (modr/m->reg modr/m) 0)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 3))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
    ((and (equal (modr/m->reg modr/m) 0)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 4))
     (let
      ((fault-var (if (or (gp-cpl-not-0)) ':gp nil)))
      (if
         fault-var
         (case fault-var
               (:gp (x86-general-protection "#GP Encountered!"
                                            start-rip temp-rip x86))
               (t (x86-step-unimplemented
                       "Unimplemented exception in x86isa!"
                       x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (equal (modr/m->reg modr/m) 1)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
      ((fault-var
            (if (or (ud-lock-used))
                ':ud
                (if (or (and (gp-cpl-not-0) (gp-cr4-umip-is-1)))
                    ':gp
                    nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 1)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 0))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:monitor))
                                 0)
                          (ud-cpl-is-not-zero))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 1)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 1))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:monitor))
                                 0)
                          (ud-cpl-is-not-zero))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 1)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 2))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:smap)) 0)
                          (ud-lock-used)
                          (ud-cpl-is-not-zero))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 1)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 3))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:smap)) 0)
                          (ud-lock-used)
                          (ud-cpl-is-not-zero))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 1)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 7))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
    ((and (equal (modr/m->reg modr/m) 2)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
      ((fault-var (if (or (ud-lock-used))
                      ':ud
                      (if (or (gp-cpl-not-0)) ':gp nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-lgdt proc-mode start-rip temp-rip prefixes
                  rex-byte opcode modr/m sib x86))))
    ((and (equal (modr/m->reg modr/m) 3)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
      ((fault-var (if (or (ud-lock-used))
                      ':ud
                      (if (or (gp-cpl-not-0)) ':gp nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-lidt proc-mode start-rip temp-rip prefixes
                  rex-byte opcode modr/m sib x86))))
    ((and (equal (modr/m->reg modr/m) 3)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 0))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:xsave))
                                 0)
                          (ud-lock-used)
                          (equal (cr4bits->osxsave (cr4)) 0))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 3)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 1))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:xsave))
                                 0)
                          (ud-lock-used)
                          (equal (cr4bits->osxsave (cr4)) 0))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 3)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 4))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
    ((and (equal (modr/m->reg modr/m) 3)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 5))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:rtm)) 0)
                          (ud-lock-used)
                          (ud-opr-used)
                          (ud-reps-used))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 3)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 6))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:hle :rtm))
                                 0)
                          (ud-lock-used))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 3)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 7))
     (let
      ((fault-var (if (or (nm-cr0-ts-is-1)) ':nm nil)))
      (if
       fault-var
       (case fault-var
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 4)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
      ((fault-var
            (if (or (ud-lock-used))
                ':ud
                (if (or (and (gp-cpl-not-0) (gp-cr4-umip-is-1)))
                    ':gp
                    nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 4)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (if (or (ud-lock-used))
                ':ud
                (if (or (and (gp-cpl-not-0) (gp-cr4-umip-is-1)))
                    ':gp
                    nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((equal (modr/m->reg modr/m) 6)
     (let
      ((fault-var (if (or (ud-lock-used))
                      ':ud
                      (if (or (gp-cpl-not-0)) ':gp nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 7)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
      ((fault-var (if (or (ud-lock-used)
                          (ud-modr/m.mod-indicates-register))
                      ':ud
                      (if (or (gp-cpl-not-0)) ':gp nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal proc-mode 0)
          (equal (modr/m->reg modr/m) 7)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 0))
     (let
      ((fault-var (if (or (ud-lock-used))
                      ':ud
                      (if (or (gp-cpl-not-0)) ':gp nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 7)
          (equal (modr/m->mod modr/m) 3)
          (equal (modr/m->r/m modr/m) 1))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:rdtscp))
                                 0)
                          (ud-lock-used))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (2
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (3
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (5
   (cond
    ((equal proc-mode 0)
     (let
      ((fault-var
            (if (or (ud-lock-used)
                    (equal (ia32_eferbits->sce (n12 (ia32_efer)))
                           0))
                ':ud
                nil)))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-syscall-both-views proc-mode start-rip temp-rip prefixes
                               rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (6
   (let
    ((fault-var (if (or (ud-lock-used))
                    ':ud
                    (if (or (gp-cpl-not-0)) ':gp nil))))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (:gp (x86-general-protection "#GP Encountered!"
                                   start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (7
   (cond
    ((equal proc-mode 0)
     (let
      ((fault-var
            (if (or (ud-lock-used)
                    (equal (ia32_eferbits->sce (n12 (ia32_efer)))
                           0))
                ':ud
                (if (or (gp-cpl-not-0)) ':gp nil))))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (:gp (x86-general-protection "#GP Encountered!"
                                           start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-sysret proc-mode start-rip temp-rip prefixes
                    rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (8
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (9
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (11 (x86-illegal-instruction "UD2 encountered!"
                               start-rip temp-rip x86))
  (13
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (16
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-4 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movups/movupd/movdqu-op/en-rm
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movups/movupd/movdqu-op/en-rm
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-5 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movss/movsd-op/en-rm
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-5 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movss/movsd-op/en-rm
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (17
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-4 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movups/movupd/movdqu-op/en-mr
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movups/movupd/movdqu-op/en-mr
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-5 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movss/movsd-op/en-mr
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-5 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movss/movsd-op/en-mr
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (18
   (cond
    ((and (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-5 (:sse)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movlps/movlpd-op/en-rm
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((and (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-7 (:sse)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-5 (:sse2)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse2)) 0)
                            (ud-modr/m.mod-indicates-register))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movlps/movlpd-op/en-rm
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse3)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse3))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movlps/movlpd-op/en-rm
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-5 (:sse3)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse3))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movlps/movlpd-op/en-rm
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (19
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-5 (:sse)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse)) 0)
                             (ud-modr/m.mod-indicates-register))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movlps/movlpd-op/en-mr
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-5 (:sse2)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse2)) 0)
                            (ud-modr/m.mod-indicates-register))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movlps/movlpd-op/en-mr
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (20
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-4 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-unpck?ps-op/en-rm
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-unpck?pd-op/en-rm
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (21
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-4 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-unpck?ps-op/en-rm
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-unpck?pd-op/en-rm
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (22
   (cond
    ((and (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-5 (:sse)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movhps/movhpd-op/en-rm
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((and (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-7 (:sse)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-5 (:sse2)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse2)) 0)
                            (ud-source-operand-is-a-register))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movhps/movhpd-op/en-rm
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse3)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse3))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (23
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-5 (:sse)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse)) 0)
                             (ud-modr/m.mod-indicates-register))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movhps/movhpd-op/en-mr
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-5 (:sse2)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse2)) 0)
                            (ud-modr/m.mod-indicates-register))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movhps/movhpd-op/en-mr
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (24
   (cond
    ((and (equal (modr/m->reg modr/m) 0)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
      ((fault-var (if (or (ud-lock-used)) ':ud nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 1)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
      ((fault-var (if (or (ud-lock-used)) ':ud nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 2)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
      ((fault-var (if (or (ud-lock-used)) ':ud nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 3)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
      ((fault-var (if (or (ud-lock-used)) ':ud nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((equal (modr/m->reg modr/m) 4)
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
    ((equal (modr/m->reg modr/m) 5)
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
    ((equal (modr/m->reg modr/m) 6)
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
    ((equal (modr/m->reg modr/m) 7)
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
    ((equal (modr/m->mod modr/m) 3)
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (25
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
  (26
   (cond
    ((and (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0))
     (let
      ((fault-var
            (if (or (equal (feature-flags-macro '(:mpx)) 0)
                    (ud-lock-used)
                    (<= 4
                        (reg-index (modr/m->reg modr/m)
                                   rex-byte 2))
                    (if (eql proc-mode 0)
                        (and (eql (modr/m->mod modr/m) 0)
                             (or (eql (modr/m->r/m modr/m) 5)
                                 (and (eql (modr/m->r/m modr/m) 4)
                                      (eql (sib->base sib) 5)
                                      (eql (sib->index sib) 4))))
                        (if (eql (prefixes->adr prefixes) 103)
                            (eql (cs.d) 1)
                            (eql (cs.d) 0))))
                ':ud
                nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:mpx)) 0))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 102))
     (let
      ((fault-var
            (if (or (equal (feature-flags-macro '(:mpx)) 0)
                    (ud-lock-used-dest-not-memory-op)
                    (<= 4
                        (reg-index (modr/m->r/m modr/m)
                                   rex-byte 0))
                    (if (and (not (eql proc-mode 0))
                             (eql (prefixes->adr prefixes) 103))
                        (eql (cs.d) 1)
                        (eql (cs.d) 0)))
                ':ud
                nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 102))
     (let
      ((fault-var
            (if (or (equal (feature-flags-macro '(:mpx)) 0)
                    (ud-lock-used-dest-not-memory-op)
                    (<= 4
                        (reg-index (modr/m->r/m modr/m)
                                   rex-byte 0))
                    (if (and (not (eql proc-mode 0))
                             (eql (prefixes->adr prefixes) 103))
                        (eql (cs.d) 1)
                        (eql (cs.d) 0)))
                ':ud
                nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
            (if (or (equal (feature-flags-macro '(:mpx)) 0)
                    (ud-lock-used)
                    (<= 4
                        (reg-index (modr/m->reg modr/m)
                                   rex-byte 2))
                    (and (not (eql proc-mode 0))
                         (if (eql (prefixes->adr prefixes) 103)
                             (eql (cs.d) 1)
                             (eql (cs.d) 0))))
                ':ud
                nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (if (or (equal (feature-flags-macro '(:mpx)) 0)
                    (ud-lock-used)
                    (<= 4
                        (reg-index (modr/m->reg modr/m)
                                   rex-byte 2))
                    (and (not (eql proc-mode 0))
                         (if (eql (prefixes->adr prefixes) 103)
                             (eql (cs.d) 1)
                             (eql (cs.d) 0))))
                ':ud
                nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (27
   (cond
    ((and (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0))
     (let
      ((fault-var
            (if (or (equal (feature-flags-macro '(:mpx)) 0)
                    (ud-lock-used)
                    (<= 4
                        (reg-index (modr/m->reg modr/m)
                                   rex-byte 2))
                    (if (eql proc-mode 0)
                        (and (eql (modr/m->mod modr/m) 0)
                             (or (eql (modr/m->r/m modr/m) 5)
                                 (and (eql (modr/m->r/m modr/m) 4)
                                      (eql (sib->base sib) 5)
                                      (eql (sib->index sib) 4))))
                        (if (eql (prefixes->adr prefixes) 103)
                            (eql (cs.d) 1)
                            (eql (cs.d) 0))))
                ':ud
                nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:mpx)) 0))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 102))
     (let
      ((fault-var
            (if (or (equal (feature-flags-macro '(:mpx)) 0)
                    (ud-lock-used-dest-not-memory-op)
                    (<= 4
                        (reg-index (modr/m->r/m modr/m)
                                   rex-byte 0))
                    (if (and (not (eql proc-mode 0))
                             (eql (prefixes->adr prefixes) 103))
                        (eql (cs.d) 1)
                        (eql (cs.d) 0)))
                ':ud
                nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 102))
     (let
      ((fault-var
            (if (or (equal (feature-flags-macro '(:mpx)) 0)
                    (ud-lock-used-dest-not-memory-op)
                    (<= 4
                        (reg-index (modr/m->r/m modr/m)
                                   rex-byte 0))
                    (if (and (not (eql proc-mode 0))
                             (eql (prefixes->adr prefixes) 103))
                        (eql (cs.d) 1)
                        (eql (cs.d) 0)))
                ':ud
                nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 243))
     (let
      ((fault-var
            (if (or (equal (feature-flags-macro '(:mpx)) 0)
                    (ud-lock-used)
                    (<= 4
                        (reg-index (modr/m->reg modr/m)
                                   rex-byte 2))
                    (if (eql proc-mode 0)
                        (and (eql (modr/m->mod modr/m) 0)
                             (or (eql (modr/m->r/m modr/m) 5)
                                 (and (eql (modr/m->r/m modr/m) 4)
                                      (eql (sib->base sib) 5)
                                      (eql (sib->index sib) 4))))
                        (if (eql (prefixes->adr prefixes) 103)
                            (eql (cs.d) 1)
                            (eql (cs.d) 0))))
                ':ud
                nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 243))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:mpx)) 0))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (if (or (equal (feature-flags-macro '(:mpx)) 0)
                    (ud-lock-used)
                    (<= 4
                        (reg-index (modr/m->reg modr/m)
                                   rex-byte 2))
                    (and (not (eql proc-mode 0))
                         (if (eql (prefixes->adr prefixes) 103)
                             (eql (cs.d) 1)
                             (eql (cs.d) 0))))
                ':ud
                nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (28
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
  (29
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
  (30
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
  (31
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-nop proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (32
   (let
    ((fault-var (if (or (ud-lock-used)
                        (let ((reg (modr/m->reg modr/m)))
                             (if (and (equal proc-mode 0)
                                      (logbitp 2 rex-byte))
                                 (not (equal reg 0))
                                 (or (equal reg 1)
                                     (equal reg 5)
                                     (equal reg 6)
                                     (equal reg 7)))))
                    ':ud
                    (if (or (gp-cpl-not-0)) ':gp nil))))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (:gp (x86-general-protection "#GP Encountered!"
                                   start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-mov-control-regs-op/en-mr
          proc-mode start-rip temp-rip prefixes
          rex-byte opcode modr/m sib x86))))
  (33
   (let
    ((fault-var (if (or (ud-lock-used)
                        (and (equal (cr4bits->de (cr4)) 1)
                             (or (equal (modr/m->reg modr/m) 4)
                                 (equal (modr/m->reg modr/m) 5))))
                    ':ud
                    (if (or (gp-cpl-not-0)) ':gp nil))))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (:gp (x86-general-protection "#GP Encountered!"
                                   start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (34
   (let
    ((fault-var (if (or (ud-lock-used)
                        (let ((reg (modr/m->reg modr/m)))
                             (if (and (equal proc-mode 0)
                                      (logbitp 2 rex-byte))
                                 (not (equal reg 0))
                                 (or (equal reg 1)
                                     (equal reg 5)
                                     (equal reg 6)
                                     (equal reg 7)))))
                    ':ud
                    (if (or (gp-cpl-not-0)) ':gp nil))))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (:gp (x86-general-protection "#GP Encountered!"
                                   start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (35
   (let
    ((fault-var (if (or (ud-lock-used)
                        (and (equal (cr4bits->de (cr4)) 1)
                             (or (equal (modr/m->reg modr/m) 4)
                                 (equal (modr/m->reg modr/m) 5))))
                    ':ud
                    (if (or (gp-cpl-not-0)) ':gp nil))))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (:gp (x86-general-protection "#GP Encountered!"
                                   start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (40
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-1 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movaps/movapd-op/en-rm
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-1 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movaps/movapd-op/en-rm
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (41
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-1 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movaps/movapd-op/en-mr
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-1 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movaps/movapd-op/en-mr
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (42
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-5 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-6 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-3 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-cvtsi2s?-op/en-rm
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-cvtsi2s?-op/en-rm
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (43
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-1 (:sse)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse)) 0)
                             (ud-modr/m.mod-indicates-register))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-1 (:sse2)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse2)) 0)
                            (ud-modr/m.mod-indicates-register))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (44
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-5 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-4 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-3 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-cvts?2si/cvtts?2si-op/en-rm
            0
            t proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-cvts?2si/cvtts?2si-op/en-rm
            1
            t proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (45
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-5 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-4 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-3 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-cvts?2si/cvtts?2si-op/en-rm
            0 nil
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-cvts?2si/cvtts?2si-op/en-rm
            1 nil
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (46
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-3 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-comis?/ucomis?-op/en-rm
            9
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-comis?/ucomis?-op/en-rm
            9
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (47
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-3 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-comis?/ucomis?-op/en-rm
            9
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-comis?/ucomis?-op/en-rm
            9
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (48
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (49
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (50
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (51
   (let
    ((fault-var (if (or (ud-lock-used))
                    ':ud
                    (if (or (and (gp-cpl-not-0) (gp-cr4-pce-is-0)))
                        ':gp
                        nil))))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (:gp (x86-general-protection "#GP Encountered!"
                                   start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (52
   (let
    ((fault-var (if (or (ud-lock-used))
                    ':ud
                    (if (or (gp-cr0-pe-is-0)) ':gp nil))))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (:gp (x86-general-protection "#GP Encountered!"
                                   start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (53
   (let
    ((fault-var (if (or (ud-lock-used))
                    ':ud
                    (if (or (gp-cpl-not-0) (gp-cr0-pe-is-0))
                        ':gp
                        nil))))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (:gp (x86-general-protection "#GP Encountered!"
                                   start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (55
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
  (56 (three-byte-opcode-decode-and-execute
           proc-mode start-rip
           temp-rip prefixes rex-byte opcode x86))
  (58 (three-byte-opcode-decode-and-execute
           proc-mode start-rip
           temp-rip prefixes rex-byte opcode x86))
  (64
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (65
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (66
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (67
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (68
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (69
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (70
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (71
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (72
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (73
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (74
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (75
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (76
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (77
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (78
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (79
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmovcc proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (80
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-7 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-7 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (81
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-2 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-sqrtps-op/en-rm proc-mode start-rip temp-rip prefixes
                            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-sqrtpd-op/en-rm proc-mode start-rip temp-rip prefixes
                            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-3 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-sqrts?-op/en-rm 0 proc-mode start-rip temp-rip prefixes
                            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-sqrts?-op/en-rm 1 proc-mode start-rip temp-rip prefixes
                            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (82
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-4 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-5 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (83
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-4 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-5 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (84
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-4 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-andp?/andnp?/orp?/xorp?/pand/pandn/por/pxor-op/en-rm
            3 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-andp?/andnp?/orp?/xorp?/pand/pandn/por/pxor-op/en-rm
            3 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (85
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-4 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-andp?/andnp?/orp?/xorp?/pand/pandn/por/pxor-op/en-rm
            13 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-andp?/andnp?/orp?/xorp?/pand/pandn/por/pxor-op/en-rm
            13 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (86
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-4 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-andp?/andnp?/orp?/xorp?/pand/pandn/por/pxor-op/en-rm
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-andp?/andnp?/orp?/xorp?/pand/pandn/por/pxor-op/en-rm
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (87
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-4 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-andp?/andnp?/orp?/xorp?/pand/pandn/por/pxor-op/en-rm
            5 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-andp?/andnp?/orp?/xorp?/pand/pandn/por/pxor-op/en-rm
            5 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (88
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-4 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-addps/subps/mulps/divps/maxps/minps-op/en-rm
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-addpd/subpd/mulpd/divpd/maxpd/minpd-op/en-rm
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-3 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-adds?/subs?/muls?/divs?/maxs?/mins?-op/en-rm
            0
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-adds?/subs?/muls?/divs?/maxs?/mins?-op/en-rm
            0
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (89
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-2 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-addps/subps/mulps/divps/maxps/minps-op/en-rm
            26 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-addpd/subpd/mulpd/divpd/maxpd/minpd-op/en-rm
            26 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-3 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-adds?/subs?/muls?/divs?/maxs?/mins?-op/en-rm
            26
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-adds?/subs?/muls?/divs?/maxs?/mins?-op/en-rm
            26
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (90
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-cvtps2pd-op/en-rm proc-mode start-rip temp-rip prefixes
                              rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-cvtpd2ps-op/en-rm proc-mode start-rip temp-rip prefixes
                              rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-cvts?2s?-op/en-rm
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-cvts?2s?-op/en-rm
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (91
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (92
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-2 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-addps/subps/mulps/divps/maxps/minps-op/en-rm
            4 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-addpd/subpd/mulpd/divpd/maxpd/minpd-op/en-rm
            4 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-3 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-adds?/subs?/muls?/divs?/maxs?/mins?-op/en-rm
            4
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-adds?/subs?/muls?/divs?/maxs?/mins?-op/en-rm
            4
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (93
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-2 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-addps/subps/mulps/divps/maxps/minps-op/en-rm
            36 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-addpd/subpd/mulpd/divpd/maxpd/minpd-op/en-rm
            36 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-2 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-adds?/subs?/muls?/divs?/maxs?/mins?-op/en-rm
            36
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-adds?/subs?/muls?/divs?/maxs?/mins?-op/en-rm
            36
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (94
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-2 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-addps/subps/mulps/divps/maxps/minps-op/en-rm
            28 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-addpd/subpd/mulpd/divpd/maxpd/minpd-op/en-rm
            28 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-3 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-adds?/subs?/muls?/divs?/maxs?/mins?-op/en-rm
            28
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-adds?/subs?/muls?/divs?/maxs?/mins?-op/en-rm
            28
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (95
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-2 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-addps/subps/mulps/divps/maxps/minps-op/en-rm
            34 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-addpd/subpd/mulpd/divpd/maxpd/minpd-op/en-rm
            34 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-3 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-adds?/subs?/muls?/divs?/maxs?/mins?-op/en-rm
            34
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-adds?/subs?/muls?/divs?/maxs?/mins?-op/en-rm
            34
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (96
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (97
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (98
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (99
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (100
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (101
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (102
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (103
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (104
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (105
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (106
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (107
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (108
   (cond
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (109
   (cond
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (110
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-8 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-5 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movd/movq-to-xmm proc-mode start-rip temp-rip prefixes
                             rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (111
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-8 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-1 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movups/movupd/movdqu-op/en-rm
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (112
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (113
   (cond
    ((and (equal (modr/m->reg modr/m) 2)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 2)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 102))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-7 (:sse2)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 4)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 4)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 102))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-7 (:sse2)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 6)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 6)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 102))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-7 (:sse2)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (114
   (cond
    ((and (equal (modr/m->reg modr/m) 2)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 2)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 102))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-7 (:sse2)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 4)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 4)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 102))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-7 (:sse2)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 6)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 6)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 102))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-7 (:sse2)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (115
   (cond
    ((and (equal (modr/m->reg modr/m) 2)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 2)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 102))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-7 (:sse2)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 3)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 102))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-7 (:sse2)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 6)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 6)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 102))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-7 (:sse2)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 7)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 102))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-7 (:sse2)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (116
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-pcmpeqb-op/en-rm proc-mode start-rip temp-rip prefixes
                             rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (117
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (118
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (119
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var (if (or (ud-lock-used)
                          (equal (cr0bits->em (cr0)) 1))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (120
   (let
    ((fault-var (if (or (gp-cpl-not-0)) ':gp nil)))
    (if
     fault-var
     (case
      fault-var
      (:gp (x86-general-protection "#GP Encountered!"
                                   start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (121
   (let
    ((fault-var (if (or (gp-cpl-not-0)) ':gp nil)))
    (if
     fault-var
     (case
      fault-var
      (:gp (x86-general-protection "#GP Encountered!"
                                   start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (124
   (cond
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse3)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse3))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse3)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse3))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (125
   (cond
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse3)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse3))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse3)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse3))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (126
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-8 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-5 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movd/movq-from-xmm proc-mode start-rip temp-rip prefixes
                               rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-5 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (127
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-8 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-1 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-movups/movupd/movdqu-op/en-mr
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (128
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (129
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (130
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (131
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (132
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (133
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (134
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (135
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (136
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (137
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (138
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (139
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (140
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (141
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (142
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (143
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-two-byte-jcc proc-mode start-rip temp-rip prefixes
                       rex-byte opcode modr/m sib x86))))
  (144
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (145
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (146
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (147
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (148
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (149
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (150
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (151
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (152
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (153
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (154
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (155
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (156
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (157
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (158
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (159
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-setcc proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (160
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-push-segment-register
          proc-mode start-rip temp-rip prefixes
          rex-byte opcode modr/m sib x86))))
  (161
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (162
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (163
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-bt-0f-a3 proc-mode start-rip temp-rip prefixes
                   rex-byte opcode modr/m sib x86))))
  (164
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-shld/shrd proc-mode start-rip temp-rip prefixes
                    rex-byte opcode modr/m sib x86))))
  (165
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-shld/shrd proc-mode start-rip temp-rip prefixes
                    rex-byte opcode modr/m sib x86))))
  (168
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-push-segment-register
          proc-mode start-rip temp-rip prefixes
          rex-byte opcode modr/m sib x86))))
  (169
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (170
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
  (171
   (let
    ((fault-var (if (or (ud-lock-used-dest-not-memory-op))
                    ':ud
                    nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (172
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-shld/shrd proc-mode start-rip temp-rip prefixes
                    rex-byte opcode modr/m sib x86))))
  (173
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-shld/shrd proc-mode start-rip temp-rip prefixes
                    rex-byte opcode modr/m sib x86))))
  (174
   (cond
    ((and (equal (modr/m->reg modr/m) 0)
          (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:fxsr)) 0)
                          (ud-lock-used))
                      ':ud
                      (if (or (nm-cr0-ts-is-1) (nm-cr0-em-is-1))
                          ':nm
                          nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal proc-mode 0)
          (equal (modr/m->reg modr/m) 0)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 243))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:fsgsbase))
                                 0)
                          (ud-lock-used)
                          (equal (cr4bits->fsgsbase (cr4)) 0))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 1)
          (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:fxsr)) 0)
                          (ud-lock-used))
                      ':ud
                      (if (or (nm-cr0-ts-is-1) (nm-cr0-em-is-1))
                          ':nm
                          nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal proc-mode 0)
          (equal (modr/m->reg modr/m) 1)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 243))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:fsgsbase))
                                 0)
                          (ud-lock-used)
                          (equal (cr4bits->fsgsbase (cr4)) 0))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 2)
          (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-5 (:sse)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-ldmxcsr/stmxcsr-op/en-m
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((and (equal proc-mode 0)
          (equal (modr/m->reg modr/m) 2)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 243))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:fsgsbase))
                                 0)
                          (ud-lock-used)
                          (equal (cr4bits->fsgsbase (cr4)) 0))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 3)
          (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-5 (:sse)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-ldmxcsr/stmxcsr-op/en-m
            proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((and (equal proc-mode 0)
          (equal (modr/m->reg modr/m) 3)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 243))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:fsgsbase))
                                 0)
                          (ud-lock-used)
                          (equal (cr4bits->fsgsbase (cr4)) 0))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 4)
          (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:xsave))
                                 0)
                          (ud-lock-used)
                          (equal (cr4bits->osxsave (cr4)) 0))
                      ':ud
                      (if (or (gp-cpl-not-0))
                          ':gp
                          (if (or (nm-cr0-ts-is-1)) ':nm nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 5)
          (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:xsave))
                                 0)
                          (ud-lock-used)
                          (equal (cr4bits->osxsave (cr4)) 0))
                      ':ud
                      (if (or (gp-cpl-not-0))
                          ':gp
                          (if (or (nm-cr0-ts-is-1)) ':nm nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 5)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:sse2)) 0)
                          (ud-lock-used))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 6)
          (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0))
     (let
      ((fault-var (if (or (ud-lock-used)
                          (equal (cr4bits->osxsave (cr4)) 0)
                          (or (equal (feature-flag-macro :xsave) 0)
                              (equal (feature-flag-macro :xsaveopt)
                                     0)))
                      ':ud
                      (if (or (nm-cr0-ts-is-1)) ':nm nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->reg modr/m) 6)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:sse2)) 0)
                          (ud-lock-used))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 7)
          (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:clfsh))
                                 0)
                          (ud-lock-used))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 7)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:sse)) 0)
                          (ud-lock-used))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (175
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-imul-op/en-rm proc-mode start-rip temp-rip prefixes
                        rex-byte opcode modr/m sib x86))))
  (176
   (let
    ((fault-var (if (or (ud-lock-used-dest-not-memory-op))
                    ':ud
                    nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmpxchg proc-mode start-rip temp-rip prefixes
                  rex-byte opcode modr/m sib x86))))
  (177
   (let
    ((fault-var (if (or (ud-lock-used-dest-not-memory-op))
                    ':ud
                    nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-cmpxchg proc-mode start-rip temp-rip prefixes
                  rex-byte opcode modr/m sib x86))))
  (178
   (let
    ((fault-var (if (or (ud-lock-used)
                        (ud-source-operand-is-a-register))
                    ':ud
                    nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (179
   (let
    ((fault-var (if (or (ud-lock-used-dest-not-memory-op))
                    ':ud
                    nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (180
   (let
    ((fault-var (if (or (ud-lock-used)
                        (ud-source-operand-is-a-register))
                    ':ud
                    nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (181
   (let
    ((fault-var (if (or (ud-lock-used)
                        (ud-source-operand-is-a-register))
                    ':ud
                    nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (182
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-movzx proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (183
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-movzx proc-mode start-rip temp-rip prefixes
                rex-byte opcode modr/m sib x86))))
  (184
   (cond
    ((equal mandatory-prefix 0)
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:popcnt))
                                 0)
                          (ud-lock-used))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (185 (x86-illegal-instruction "UD1 encountered!"
                                start-rip temp-rip x86))
  (186
   (cond
    ((equal (modr/m->reg modr/m) 4)
     (let
      ((fault-var (if (or (ud-lock-used)) ':ud nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-bt-0f-ba proc-mode start-rip temp-rip prefixes
                      rex-byte opcode modr/m sib x86))))
    ((equal (modr/m->reg modr/m) 5)
     (let
      ((fault-var (if (or (ud-lock-used-dest-not-memory-op))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((equal (modr/m->reg modr/m) 6)
     (let
      ((fault-var (if (or (ud-lock-used-dest-not-memory-op))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((equal (modr/m->reg modr/m) 7)
     (let
      ((fault-var (if (or (ud-lock-used-dest-not-memory-op))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (187
   (let
    ((fault-var (if (or (ud-lock-used-dest-not-memory-op))
                    ':ud
                    nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (188
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var (if (or (ud-lock-used)) ':ud nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-bsf-op/en-rm proc-mode start-rip temp-rip prefixes
                          rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 243)
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (189
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var (if (or (ud-lock-used)) ':ud nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var (if (or (ud-lock-used)) ':ud nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (190
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-movsxd proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (191
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-movsxd proc-mode start-rip temp-rip prefixes
                 rex-byte opcode modr/m sib x86))))
  (192
   (let
    ((fault-var (if (or (ud-lock-used-dest-not-memory-op))
                    ':ud
                    nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (193
   (let
    ((fault-var (if (or (ud-lock-used-dest-not-memory-op))
                    ':ud
                    nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (194
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-2 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-cmpps-op/en-rmi proc-mode start-rip temp-rip prefixes
                            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-cmppd-op/en-rmi proc-mode start-rip temp-rip prefixes
                            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-3 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-cmpss/cmpsd-op/en-rmi
            0 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-3 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-cmpss/cmpsd-op/en-rmi
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (195
   (let
    ((fault-var (if (or (equal (feature-flags-macro '(:sse2)) 0)
                        (ud-lock-used)
                        (ud-modr/m.mod-indicates-register))
                    ':ud
                    nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (196
   (cond
    ((and (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-5 (:sse)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-5 (:sse)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 102))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-5 (:sse2)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((and (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 102))
     (let
      ((fault-var (let ((chk-ex (or (chk-exc :type-5 (:sse2)))))
                       (or chk-ex nil))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (197
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-5 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-5 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (198
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-4 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-shufps-op/en-rmi proc-mode start-rip temp-rip prefixes
                             rex-byte opcode modr/m sib x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-shufpd-op/en-rmi proc-mode start-rip temp-rip prefixes
                             rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (199
   (cond
    ((and (equal (modr/m->reg modr/m) 1)
          (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0)
          (logbitp 3 rex-byte))
     (let
      ((fault-var
            (if (or (equal (feature-flags-macro '(:cmpxchg16b))
                           0)
                    (ud-modr/m.mod-indicates-register))
                ':ud
                nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 1)
          (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0)
          (not (logbitp 3 rex-byte)))
     (let
      ((fault-var
            (if (or (equal (feature-flags-macro '(:cmpxchg16b))
                           0)
                    (ud-modr/m.mod-indicates-register))
                ':ud
                nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal (modr/m->reg modr/m) 6)
          (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0))
     (let
      ((fault-var (if (or (gp-cpl-not-0)) ':gp nil)))
      (if
         fault-var
         (case fault-var
               (:gp (x86-general-protection "#GP Encountered!"
                                            start-rip temp-rip x86))
               (t (x86-step-unimplemented
                       "Unimplemented exception in x86isa!"
                       x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (equal (modr/m->reg modr/m) 6)
          (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 102))
     (let
      ((fault-var (if (or (gp-cpl-not-0)) ':gp nil)))
      (if
         fault-var
         (case fault-var
               (:gp (x86-general-protection "#GP Encountered!"
                                            start-rip temp-rip x86))
               (t (x86-step-unimplemented
                       "Unimplemented exception in x86isa!"
                       x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (equal (modr/m->reg modr/m) 6)
          (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 243))
     (let
      ((fault-var (if (or (gp-cpl-not-0)) ':gp nil)))
      (if
         fault-var
         (case fault-var
               (:gp (x86-general-protection "#GP Encountered!"
                                            start-rip temp-rip x86))
               (t (x86-step-unimplemented
                       "Unimplemented exception in x86isa!"
                       x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (equal (modr/m->reg modr/m) 7)
          (not (equal (modr/m->mod modr/m) 3))
          (equal mandatory-prefix 0))
     (let
      ((fault-var (if (or (gp-cpl-not-0)) ':gp nil)))
      (if
         fault-var
         (case fault-var
               (:gp (x86-general-protection "#GP Encountered!"
                                            start-rip temp-rip x86))
               (t (x86-step-unimplemented
                       "Unimplemented exception in x86isa!"
                       x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (equal (modr/m->reg modr/m) 6)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:rdrand))
                                 0)
                          (ud-lock-used)
                          (ud-reps-used))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-rdrand proc-mode start-rip temp-rip prefixes
                    rex-byte opcode modr/m sib x86))))
    ((and (equal (modr/m->reg modr/m) 6)
          (equal (modr/m->mod modr/m) 3)
          (equal mandatory-prefix 102))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:rdrand))
                                 0)
                          (ud-lock-used)
                          (ud-reps-used))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-rdrand proc-mode start-rip temp-rip prefixes
                    rex-byte opcode modr/m sib x86))))
    ((and (equal (modr/m->reg modr/m) 7)
          (equal mandatory-prefix 0))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:rdseed))
                                 0)
                          (ud-lock-used)
                          (ud-reps-used))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (equal proc-mode 0)
          (equal (modr/m->reg modr/m) 7)
          (equal mandatory-prefix 243))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:rdpid))
                                 0)
                          (ud-lock-used))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (equal proc-mode 0))
          (equal (modr/m->reg modr/m) 7)
          (equal mandatory-prefix 243))
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:rdpid))
                                 0)
                          (ud-lock-used))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (200
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (201
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (202
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (203
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (204
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (205
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (206
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (207
   (let
    ((fault-var (if (or (ud-lock-used)) ':ud nil)))
    (if
     fault-var
     (case
      fault-var
      (:ud (x86-illegal-instruction "#UD Encountered!"
                                    start-rip temp-rip x86))
      (t
        (x86-step-unimplemented "Unimplemented exception in x86isa!"
                                x86)))
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                             x86))))
  (208
   (cond
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse3)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse3))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse3)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse3))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (209
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (210
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (211
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (212
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (213
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (214
   (cond
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:sse2)) 0)
                          (equal (cr0bits->ts (cr0)) 1)
                          (equal (cr0bits->em (cr0)) 1)
                          (equal (cr4bits->osfxsr (cr4)) 0)
                          (ud-lock-used))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var (if (or (equal (feature-flags-macro '(:sse2)) 0)
                          (equal (cr0bits->ts (cr0)) 1)
                          (equal (cr0bits->em (cr0)) 1)
                          (equal (cr4bits->osfxsr (cr4)) 0)
                          (ud-lock-used))
                      ':ud
                      nil)))
      (if
        fault-var
        (case fault-var
              (:ud (x86-illegal-instruction "#UD Encountered!"
                                            start-rip temp-rip x86))
              (t (x86-step-unimplemented
                      "Unimplemented exception in x86isa!"
                      x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (215
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-7 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-7 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-pmovmskb-op/en-rm proc-mode start-rip temp-rip prefixes
                              rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (216
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (217
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (218
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (219
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-andp?/andnp?/orp?/xorp?/pand/pandn/por/pxor-op/en-rm
            3 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (220
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (221
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (222
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (223
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-andp?/andnp?/orp?/xorp?/pand/pandn/por/pxor-op/en-rm
            13 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (224
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (225
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (226
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (227
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (228
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (229
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (230
   (cond
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 243)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-5 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-2 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (231
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-22-8 (:mmx)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:mmx)) 0)
                             (ud-modr/m.mod-indicates-register))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-1 (:sse2)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse2)) 0)
                            (ud-modr/m.mod-indicates-register))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (232
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (233
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (234
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-4 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (235
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-andp?/andnp?/orp?/xorp?/pand/pandn/por/pxor-op/en-rm
            1 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (236
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (237
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (238
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (239
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-andp?/andnp?/orp?/xorp?/pand/pandn/por/pxor-op/en-rm
            5 proc-mode start-rip temp-rip prefixes
            rex-byte opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (240
   (cond
    ((equal mandatory-prefix 242)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-4 (:sse3)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse3)) 0)
                            (ud-modr/m.mod-indicates-register))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (241
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (242
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (243
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (244
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (245
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (246
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:sse)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:sse)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (247
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-8 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (248
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (249
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (250
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    ((equal mandatory-prefix 102)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-4 (:sse2)))))
                 (or chk-ex
                     (if (or (equal (feature-flags-macro '(:sse2))
                                    0))
                         ':ud
                         nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
       (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                               x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (251
   (cond
    ((equal mandatory-prefix 0)
     (let
      ((fault-var
           (let ((chk-ex (or (chk-exc :type-22-7 (:mmx)))))
                (or chk-ex
                    (if (or (equal (feature-flags-macro '(:mmx)) 0))
                        ':ud
                        nil)))))
      (if
       fault-var
       (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"