• Top
  • Documentation
  • Books
  • Boolean-reasoning
  • Projects
  • Debugging
  • Std
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
  • Hardware-verification
  • Software-verification
    • Kestrel-books
    • X86isa
      • Program-execution
      • Sdm-instruction-set-summary
      • Tlb
      • Booting-linux
      • Introduction
      • Asmtest
      • X86isa-build-instructions
      • Publications
      • Contributors
      • Machine
        • X86isa-state
        • Syscalls
        • Cpuid
        • Linear-memory
        • Rflag-specifications
        • Characterizing-undefined-behavior
        • Top-level-memory
        • App-view
        • X86-decoder
          • Get-prefixes
          • Vex-0f3a-execute
          • Vex-0f38-execute
          • Vex-0f-execute
          • Two-byte-opcode-execute
          • Second-three-byte-opcode-execute
          • One-byte-opcode-execute
          • First-three-byte-opcode-execute
          • Evex-0f3a-execute
          • Evex-0f38-execute
          • Evex-0f-execute
          • X86-fetch-decode-execute
          • Vex-decode-and-execute
          • Evex-decode-and-execute
          • 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

Vex-0f-execute

Dispatch function for VEX-encoded instructions in the two-byte opcode map

Signature

(vex-0f-execute proc-mode 
                start-rip temp-rip prefixes rex-byte 
                vex-prefixes opcode modr/m sib x86) 
 
  → 
x86

Arguments

temp-rip — temp-rip points to the byte following the SIB byte (if present), or the ModR/M byte (if present with no SIB byte), or the opcode byte (if there is no ModR/M byte).

vex-prefixes — Completely populated when this function is called.

Returns

x86 — Type (x86p x86), given (x86p x86).

Definitions and Theorems

Function: vex-0f-execute

(defun vex-0f-execute
       (proc-mode start-rip temp-rip prefixes rex-byte
                  vex-prefixes 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) rex-byte)
          (type (unsigned-byte 24) vex-prefixes)
          (type (unsigned-byte 8) opcode)
          (type (unsigned-byte 8) modr/m)
          (type (unsigned-byte 8) sib))
 (declare (xargs :guard (and (vex-prefixes-byte0-p vex-prefixes)
                             (modr/m-p modr/m)
                             (sib-p sib)
                             (rip-guard-okp proc-mode temp-rip))))
 (case opcode
  (16
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vmovups-vex-a proc-mode
                            start-rip temp-rip prefixes rex-byte
                            vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vmovups-vex-a proc-mode
                            start-rip temp-rip prefixes rex-byte
                            vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (17
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vmovups-vex-b proc-mode
                            start-rip temp-rip prefixes rex-byte
                            vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vmovups-vex-b proc-mode
                            start-rip temp-rip prefixes rex-byte
                            vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (18
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (19
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (20
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (21
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (22
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (40
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (41
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (42
   (cond
    ((and (equal (vex->pp vex-prefixes) 3)
          (equal (vex->w vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 3)
          (equal (vex->w vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 2)
          (equal (vex->w vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 2)
          (equal (vex->w vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (43
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 3)
          (equal (vex->w vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 3)
          (equal (vex->w vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 2)
          (equal (vex->w vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 2)
          (equal (vex->w vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (45
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 3)
          (equal (vex->w vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 3)
          (equal (vex->w vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 2)
          (equal (vex->w vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 2)
          (equal (vex->w vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (46
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (47
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (65
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (66
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (68
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (69
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (70
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (71
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (74
   (cond
     ((and (equal (vex->vvvv vex-prefixes) 15)
           (equal (vex->l vex-prefixes) 1)
           (equal (vex->pp vex-prefixes) 1)
           (equal (vex->w vex-prefixes) 0)
           (equal (modr/m->mod modr/m) 3))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512dq)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512dq))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
           (equal (vex->l vex-prefixes) 1)
           (equal (vex->pp vex-prefixes) 1)
           (equal (vex->w vex-prefixes) 1)
           (equal (modr/m->mod modr/m) 3))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512bw))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
           (equal (vex->pp vex-prefixes) 0)
           (equal (vex->l vex-prefixes) 1)
           (equal (vex->w vex-prefixes) 1)
           (equal (modr/m->mod modr/m) 3))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512bw))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
           (equal (vex->pp vex-prefixes) 0)
           (equal (vex->l vex-prefixes) 1)
           (equal (vex->w vex-prefixes) 0)
           (equal (modr/m->mod modr/m) 3))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512dq)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512dq))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (75
   (cond
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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))))
  (80
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-7 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-7 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-7 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-7 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (82
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              3 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              3 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              3 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              5 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (85
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              13 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              13 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              13 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              13 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (86
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              1 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              1 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              1 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              1 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (87
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              5 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              5 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              5 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              5 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (88
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (89
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (90
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (91
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (93
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (94
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (95
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (96
   (cond
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (97
   (cond
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (98
   (cond
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (99
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (101
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (102
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (103
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (104
   (cond
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (105
   (cond
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (106
   (cond
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (107
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (109
   (cond
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (110
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (111
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (112
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 3)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (113
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 2))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-7 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 2))
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-7 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 4))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-7 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 4))
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-7 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 6))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-7 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 6))
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-7 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (114
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 2))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-7 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 2))
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-7 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 4))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-7 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 4))
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-7 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 6))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-7 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 6))
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-7 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (115
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 2))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 2))
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 3))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 3))
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 6))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 6))
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 7))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (equal (modr/m->reg modr/m) 7))
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (116
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (117
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (118
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (119
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-8 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-8 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vzeroupper proc-mode
                         start-rip temp-rip prefixes rex-byte
                         vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (120 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (121 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (122 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (123 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (124
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (127
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (144
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k21 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k21 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->w vex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k21 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->w vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k21 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (145
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k21 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k21 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->w vex-prefixes) 1)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k21 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->w vex-prefixes) 0)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k21 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (146
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 3)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 3)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (147
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 3)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 3)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (152
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->w vex-prefixes) 1)
          (equal (modr/m->mod modr/m) 3))
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->w vex-prefixes) 0)
          (equal (modr/m->mod modr/m) 3))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (153
   (cond
     ((and (equal (vex->vvvv vex-prefixes) 15)
           (equal (vex->l vex-prefixes) 0)
           (equal (vex->pp vex-prefixes) 1)
           (equal (vex->w vex-prefixes) 0)
           (equal (modr/m->mod modr/m) 3))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512dq)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512dq))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
           (equal (vex->l vex-prefixes) 0)
           (equal (vex->pp vex-prefixes) 1)
           (equal (vex->w vex-prefixes) 1)
           (equal (modr/m->mod modr/m) 3))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512bw))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
           (equal (vex->pp vex-prefixes) 0)
           (equal (vex->l vex-prefixes) 0)
           (equal (vex->w vex-prefixes) 1)
           (equal (modr/m->mod modr/m) 3))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512bw)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512bw))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
           (equal (vex->pp vex-prefixes) 0)
           (equal (vex->l vex-prefixes) 0)
           (equal (vex->w vex-prefixes) 0)
           (equal (modr/m->mod modr/m) 3))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-k20 (:avx512dq)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512dq))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (174
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (equal (modr/m->reg modr/m) 2))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          (equal (modr/m->reg modr/m) 3))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (194
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-3 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (196
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (equal (vex->w vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->pp vex-prefixes) 0)
          (equal (vex->l vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (208
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (210
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (211
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (212
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpaddb/vpaddw/vpaddd/vpaddq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpaddb/vpaddw/vpaddd/vpaddq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (213
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (215
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-7 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-7 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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))))
  (216
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              3 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              3 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (220
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              13 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              13 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (224
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (226
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (227
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 2)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-5 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 3)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-2 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-1 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              5 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              5 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (236
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              5 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vandp?/vandnp?/vorp?/vxorp?/vpand/vpandn/vpor/vpxor-vex
              5 proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (240
   (cond
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 3)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 3)
          (not (equal (modr/m->mod modr/m) 3)))
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (242
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (243
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (244
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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 (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->vvvv vex-prefixes) 15)
          (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#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
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpsubb/vpsubw/vpsubd/vpsubq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpsubb/vpsubw/vpsubd/vpsubq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (249
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpsubb/vpsubw/vpsubd/vpsubq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpsubb/vpsubw/vpsubd/vpsubq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (250
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpsubb/vpsubw/vpsubd/vpsubq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpsubb/vpsubw/vpsubd/vpsubq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (251
   (cond
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpsubb/vpsubw/vpsubd/vpsubq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpsubb/vpsubw/vpsubd/vpsubq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (252
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpaddb/vpaddw/vpaddd/vpaddq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpaddb/vpaddw/vpaddd/vpaddq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (253
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpaddb/vpaddw/vpaddd/vpaddq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpaddb/vpaddw/vpaddd/vpaddq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (254
   (cond
    ((and (equal (vex->l vex-prefixes) 0)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-4 (:avx)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx)) 0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpaddb/vpaddw/vpaddd/vpaddq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes opcode modr/m sib x86))))
    ((and (equal (vex->l vex-prefixes) 1)
          (equal (vex->pp vex-prefixes) 1)
          't)
     (let ((fault-var
                (let ((chk-ex (or (chk-exc :type-4 (:avx2)))))
                  (or chk-ex
                      (if (or (equal (feature-flags-macro '(:avx2))
                                     0))
                          ':ud
                        nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-vpaddb/vpaddw/vpaddd/vpaddq-vex
              proc-mode
              start-rip temp-rip prefixes rex-byte
              vex-prefixes 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-of-vex-0f-execute

(defthm x86p-of-vex-0f-execute
 (implies
     (x86p x86)
     (b* ((x86 (vex-0f-execute proc-mode
                               start-rip temp-rip prefixes rex-byte
                               vex-prefixes opcode modr/m sib x86)))
       (x86p x86)))
 :rule-classes :rewrite)