• Top
  • Documentation
  • Books
  • Boolean-reasoning
  • Projects
  • Debugging
  • Community
  • Std
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
  • Hardware-verification
  • Software-verification
    • Kestrel-books
    • X86isa
      • Program-execution
      • Sdm-instruction-set-summary
      • Tlb
      • Running-linux
      • Introduction
      • Asmtest
      • X86isa-build-instructions
      • Publications
      • Contributors
      • Machine
        • X86isa-state
        • Syscalls
        • Cpuid
        • Linear-memory
        • Rflag-specifications
        • Characterizing-undefined-behavior
        • App-view
        • Top-level-memory
        • 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
          • X86-run
          • Implemented-opcodes
          • Three-byte-opcode-decode-and-execute
          • X86-run-halt-count
          • Two-byte-opcode-decode-and-execute
          • X86-run-steps
          • Opcode-maps
          • X86-run-halt
          • X86-fetch-decode-execute-halt
          • X86-run-steps1
        • Physical-memory
        • Decoding-and-spec-utils
        • Instructions
        • Register-readers-and-writers
        • X86-modes
        • Segmentation
        • Other-non-deterministic-computations
        • Environment
        • Paging
      • Implemented-opcodes
      • To-do
      • Proof-utilities
      • Peripherals
      • Model-validation
      • Modelcalls
      • Concrete-simulation-examples
      • Utils
      • Debugging-code-proofs
    • Axe
    • Execloader
  • Math
  • Testing-utilities

• 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-ltr proc-mode start-rip temp-rip prefixes
                  rex-byte opcode modr/m sib 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-sgdt proc-mode start-rip temp-rip prefixes
                  rex-byte opcode modr/m sib 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-invlpg 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) 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-swapgs proc-mode start-rip temp-rip prefixes
                     rex-byte opcode modr/m sib 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
   (cond
     ('t
      (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))))
  (3
   (cond
     ('t
      (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))))
  (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
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip 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
   (cond
     ('t
      (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))))
  (9
   (cond
     ('t
      (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))))
  (11 (cond ('t
             (x86-illegal-instruction "UD2 encountered!"
                                      start-rip temp-rip x86))
            (t (x86-illegal-instruction "#UD Encountered!"
                                        start-rip temp-rip x86))))
  (13
   (cond
     ('t
      (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))))
  (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
                   (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-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
                   (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-movhlps-sse 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-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))))
    ((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-movddup-sse 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
                   (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-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
                   (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-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-two-byte-nop proc-mode start-rip temp-rip prefixes
                           rex-byte opcode modr/m sib 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-two-byte-nop proc-mode start-rip temp-rip prefixes
                           rex-byte opcode modr/m sib 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-two-byte-nop 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 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))))
    ((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 (cond ('t
             (x86-two-byte-nop 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))))
  (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
   (cond
    ('t
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (29
   (cond
    ('t
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (30
   (cond ('t
          (x86-endbr32/endbr64 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))))
  (31
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (32
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (33
   (cond
    ('t
     (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-two-byte-nop 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))))
  (34
   (cond
     ('t
      (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-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))))
  (35
   (cond
    ('t
     (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-two-byte-nop 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))))
  (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 '(: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-22-6 (:mmx)))))
                  (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-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 '(: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-22-4 (:mmx)))))
                  (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-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 '(: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-22-4 (:mmx)))))
                  (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-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
   (cond
     ('t
      (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-wrmsr 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))))
  (49
   (cond
     ('t
      (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-rdtsc 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))))
  (50
   (cond
     ('t
      (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-rdmsr 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))))
  (51
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (52
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (53
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (55
   (cond
    ('t
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (56 (cond ('t
             (three-byte-opcode-decode-and-execute
                  proc-mode start-rip
                  temp-rip prefixes rex-byte opcode x86))
            (t (x86-illegal-instruction "#UD Encountered!"
                                        start-rip temp-rip x86))))
  (58 (cond ('t
             (three-byte-opcode-decode-and-execute
                  proc-mode start-rip
                  temp-rip prefixes rex-byte opcode x86))
            (t (x86-illegal-instruction "#UD Encountered!"
                                        start-rip temp-rip x86))))
  (64
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (65
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (66
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (67
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (68
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (69
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (70
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (71
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (72
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (73
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (74
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (75
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (76
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (77
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (78
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (79
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip 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-punpckl-sse 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))))
  (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-punpckl-sse 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))))
  (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-punpckl-sse 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))))
  (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-pcmpgtb/pcmpgtw/pcmpgtd-sse
              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))))
  (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-pcmpgtb/pcmpgtw/pcmpgtd-sse
              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))))
  (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-pcmpgtb/pcmpgtw/pcmpgtd-sse
              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))))
  (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-packuswb-sse 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))))
  (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-punpckh-sse 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))))
  (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-punpckh-sse 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))))
  (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-punpckh-sse 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))))
  (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-punpckl-sse 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))))
  (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-punpckh-sse 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))))
  (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-movdqa-to-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-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 '(: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-pshufd 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 (: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-pshufhw 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-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-pshuflw 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))))
  (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
                   (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))))
    ((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
                      (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-psrl-imm-sse proc-mode start-rip temp-rip prefixes
                           rex-byte opcode modr/m sib 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
                   (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))))
    ((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
                      (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-psra-imm-sse 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 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))))
    ((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
                      (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-psll-imm-sse 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))))
  (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
                   (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))))
    ((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
                      (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-psrl-imm-sse proc-mode start-rip temp-rip prefixes
                           rex-byte opcode modr/m sib 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
                   (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))))
    ((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
                      (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-psra-imm-sse 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 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))))
    ((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
                      (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-psll-imm-sse 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))))
  (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
                   (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))))
    ((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
                      (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-psrl-imm-sse 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 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-pslldq/psrldq 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 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))))
    ((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
                      (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-psll-imm-sse proc-mode start-rip temp-rip prefixes
                           rex-byte opcode modr/m sib 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
                      (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-pslldq/psrldq 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))))
  (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/pcmpeqw/pcmpeqd-sse
              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-pcmpeqb/pcmpeqw/pcmpeqd-sse
              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))))
  (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-pcmpeqb/pcmpeqw/pcmpeqd-sse
              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))))
  (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
   (cond
      ('t
       (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))))
      (t (x86-illegal-instruction "#UD Encountered!"
                                  start-rip temp-rip x86))))
  (121
   (cond
      ('t
       (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))))
      (t (x86-illegal-instruction "#UD Encountered!"
                                  start-rip temp-rip 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-movq-from-xmm/mem 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))))
  (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-movdqa-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-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
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (129
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (130
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (131
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (132
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (133
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (134
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (135
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (136
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (137
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (138
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (139
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (140
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (141
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (142
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (143
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (144
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (145
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (146
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (147
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (148
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (149
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (150
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (151
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (152
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (153
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (154
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (155
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (156
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (157
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (158
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (159
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (160
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (161
   (cond
     ('t
      (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))))
  (162
   (cond
     ('t
      (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-cpuid 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))))
  (163
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (164
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (165
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (168
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (169
   (cond
     ('t
      (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))))
  (170
   (cond
    ('t
     (x86-step-unimplemented "Opcode Unimplemented in x86isa!" x86))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (171
   (cond
     ('t
      (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-bt-0f-ab 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))))
  (172
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (173
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip 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-fxsave/fxsave64 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) 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-fxrstor/fxrstor64 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) 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
                   (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-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
                   (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-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-two-byte-nop proc-mode start-rip temp-rip prefixes
                           rex-byte opcode modr/m sib 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
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (176
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (177
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (178
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (179
   (cond
     ('t
      (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-btr-0f-b3 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))))
  (180
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (181
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (182
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (183
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip 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-popcnt 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))))
  (185 (cond ('t
              (x86-illegal-instruction "UD1 encountered!"
                                       start-rip temp-rip x86))
             (t (x86-illegal-instruction "#UD 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-bt-0f-ba proc-mode start-rip temp-rip prefixes
                        rex-byte opcode modr/m sib 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-bt-0f-ba proc-mode start-rip temp-rip prefixes
                        rex-byte opcode modr/m sib 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-bt-0f-ba 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))))
  (187
   (cond
     ('t
      (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))))
  (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-tzcnt 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))))
  (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-bsr proc-mode start-rip temp-rip prefixes
                   rex-byte opcode modr/m sib 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
   (cond
     ('t
      (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-movsx 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))))
  (191
   (cond
     ('t
      (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-movsx 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))))
  (192
   (cond
     ('t
      (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-add/xadd/adc/sub/sbb/or/and/xor/cmp/test-e-g
               38 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))))
  (193
   (cond
     ('t
      (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-add/xadd/adc/sub/sbb/or/and/xor/cmp/test-e-g
               38 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))))
  (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
   (cond
     ('t
      (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))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip 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
                   (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))))
    ((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
                   (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))))
    ((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
                      (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))))
    ((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
                      (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))))
  (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-cmpxchg8b/16b proc-mode start-rip temp-rip prefixes
                            rex-byte opcode modr/m sib 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-cmpxchg8b/16b proc-mode start-rip temp-rip prefixes
                            rex-byte opcode modr/m sib 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
   (cond
     ('t
      (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-bswap 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))))
  (201
   (cond
     ('t
      (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-bswap 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))))
  (202
   (cond
     ('t
      (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-bswap 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))))
  (203
   (cond
     ('t
      (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-bswap 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))))
  (204
   (cond
     ('t
      (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-bswap 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))))
  (205
   (cond
     ('t
      (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-bswap 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))))
  (206
   (cond
     ('t
      (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-bswap 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))))
  (207
   (cond
     ('t
      (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-bswap 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))))
  (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-psrl-xmm-sse 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))))
  (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-psrl-xmm-sse 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))))
  (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-psrl-xmm-sse 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))))
  (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-paddb/paddw/paddd/paddq-mmx
              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-paddb/paddw/paddd/paddq-sse
              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))))
  (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-movq-to-xmm/mem proc-mode start-rip temp-rip prefixes
                              rex-byte opcode modr/m sib 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-psra-xmm-sse 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))))
  (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-psra-xmm-sse 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))))
  (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 '(: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))))
  (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 '(: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))))
  (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-psll-xmm-sse 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))))
  (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-psll-xmm-sse 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))))
  (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-psll-xmm-sse 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))))
  (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 '(: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-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 '(: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))))
  (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-psubb/psubw/psubd/psubq-sse
              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))))
  (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-psubb/psubw/psubd/psubq-sse
              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))))
  (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-psubb/psubw/psubd/psubq-sse
              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))))
  (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 '(: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-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-psubb/psubw/psubd/psubq-sse
              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))))
  (252
   (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-paddb/paddw/paddd/paddq-mmx
              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-paddb/paddw/paddd/paddq-sse
              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))))
  (253
   (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-paddb/paddw/paddd/paddq-mmx
              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-paddb/paddw/paddd/paddq-sse
              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))))
  (254
   (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-paddb/paddw/paddd/paddq-mmx
              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-paddb/paddw/paddd/paddq-sse
              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))))
  (t (x86-illegal-instruction "#UD Encountered!"
                              start-rip temp-rip x86))))

Theorem: x86p-two-byte-opcode-execute

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