• Top
  • Documentation
    • Xdoc
      • Missing-parents
        • Exec-bgeu
        • Exec-bltu
        • Exec-blt
        • Exec-bge
        • Exec-jalr
        • Exec-bne
        • Exec-beq
        • Exec-sra
        • Exec-op-imms-32
        • Exec-srl
        • Exec-sll
        • Exec-op-imms64
        • Exec-op-imms32
        • Exec-op-imm-32
        • Exec-op-32
        • Exec-op
        • Exec-branch
        • Exec-srlw
        • Exec-srliw
        • Exec-sraw
        • Exec-sraiw
        • Exec-sltiu
        • Exec-remuw
        • Exec-op-imm
        • Exec-jal
        • Exec-store
        • Exec-srli64
        • Exec-srli32
        • Exec-srai64
        • Exec-srai32
        • Exec-sllw
        • Exec-remw
        • Exec-load
        • Exec-divuw
        • Exec-addiw
        • Exec-xori
        • Exec-slti
        • Exec-slliw
        • Exec-remu
        • Exec-rem
        • Exec-divw
        • Exec-sw
        • Exec-slli64
        • Exec-slli32
        • Exec-ori
        • Exec-mulhsu
        • Exec-divu
        • Exec-andi
        • Exec-addi
        • Exec-sltu
        • Exec-slt
        • Exec-mulhu
        • Exec-lwu
        • Exec-div
        • Exec-auipc
        • Exec-addw
        • Exec-xor
        • Exec-mulw
        • Exec-mulh
        • Exec-and
        • Exec-subw
        • Exec-sub
        • Exec-sh
        • Exec-sd
        • Exec-sb
        • Exec-or
        • Exec-lhu
        • Exec-lh
        • Exec-ld
        • Exec-lbu
        • Exec-lb
        • Exec-mul
        • Exec-add
        • Exec-lw
        • Exec-lui
        • Eff-addr
        • Exec-instr
        • Missing-parents-test
      • Undocumented
      • Save
      • Defsection
      • Markup
      • Preprocessor
      • Terminal
      • Emacs-links
      • Defxdoc
      • Katex-integration
      • Constructors
      • Entities
      • Defxdoc+
      • Save-rendered
      • Add-resource-directory
      • Testing
      • Order-subtopics
      • Save-rendered-event
      • Archive-matching-topics
      • Archive-xdoc
      • Xdoc-extend
      • Set-default-parents
      • Defpointer
      • Defxdoc-raw
      • Xdoc-tests
      • Xdoc-prepend
      • Defsection-progn
      • Gen-xdoc-for-file
    • ACL2-doc
    • Recursion-and-induction
    • Loop$-primer
    • Operational-semantics
    • Pointers
    • Doc
    • Documentation-copyright
    • Course-materials
    • Publications
    • Args
    • ACL2-doc-summary
    • Finding-documentation
    • Broken-link
    • Doc-terminal-test-2
    • Doc-terminal-test-1
  • Books
  • Boolean-reasoning
  • Projects
  • Debugging
  • Std
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
  • Hardware-verification
  • Software-verification
  • Math
  • Testing-utilities

• Missing-parents

Exec-instr

Semantics of instructions.

Signature

(exec-instr instr pc stat feat) → new-stat

Arguments

instr — Guard (instrp instr).

stat — Guard (statp stat).

feat — Guard (featp feat).

Returns

new-stat — Type (statp new-stat).

Definitions and Theorems

Function: exec-instr

(defun exec-instr (instr pc stat feat)
 (declare (xargs :guard (and (instrp instr)
                             (statp stat)
                             (featp feat))))
 (declare (xargs :guard (and (instr-validp instr feat)
                             (cond ((feat-32p feat) (ubyte32p pc))
                                   ((feat-64p feat) (ubyte64p pc))
                                   (t (impossible)))
                             (stat-validp stat feat))))
 (let ((__function__ 'exec-instr))
   (declare (ignorable __function__))
   (instr-case
        instr
        :op-imm (exec-op-imm instr.funct
                             instr.rd instr.rs1 instr.imm stat feat)
        :op-imms32
        (exec-op-imms32 instr.funct
                        instr.rd instr.rs1 instr.imm stat feat)
        :op-imms64
        (exec-op-imms64 instr.funct
                        instr.rd instr.rs1 instr.imm stat feat)
        :op-imm-32
        (exec-op-imm-32 instr.funct
                        instr.rd instr.rs1 instr.imm stat feat)
        :op-imms-32
        (exec-op-imms-32 instr.funct
                         instr.rd instr.rs1 instr.imm stat feat)
        :lui (exec-lui instr.rd instr.imm stat feat)
        :auipc (exec-auipc instr.rd instr.imm pc stat feat)
        :op (exec-op instr.funct
                     instr.rd instr.rs1 instr.rs2 stat feat)
        :op-32 (exec-op-32 instr.funct
                           instr.rd instr.rs1 instr.rs2 stat feat)
        :jal (exec-jal instr.rd instr.imm pc stat feat)
        :jalr (exec-jalr instr.rd
                         instr.rs1 instr.imm pc stat feat)
        :branch (exec-branch instr.funct instr.rs1
                             instr.rs2 instr.imm pc stat feat)
        :load (exec-load instr.funct
                         instr.rd instr.rs1 instr.imm stat feat)
        :store (exec-store instr.funct instr.rs1
                           instr.rs2 instr.imm stat feat))))

Theorem: statp-of-exec-instr

(defthm statp-of-exec-instr
  (b* ((new-stat (exec-instr instr pc stat feat)))
    (statp new-stat))
  :rule-classes :rewrite)

Theorem: exec-instr-of-instr-fix-instr

(defthm exec-instr-of-instr-fix-instr
  (equal (exec-instr (instr-fix instr)
                     pc stat feat)
         (exec-instr instr pc stat feat)))

Theorem: exec-instr-instr-equiv-congruence-on-instr

(defthm exec-instr-instr-equiv-congruence-on-instr
  (implies (instr-equiv instr instr-equiv)
           (equal (exec-instr instr pc stat feat)
                  (exec-instr instr-equiv pc stat feat)))
  :rule-classes :congruence)

Theorem: exec-instr-of-stat-fix-stat

(defthm exec-instr-of-stat-fix-stat
  (equal (exec-instr instr pc (stat-fix stat)
                     feat)
         (exec-instr instr pc stat feat)))

Theorem: exec-instr-stat-equiv-congruence-on-stat

(defthm exec-instr-stat-equiv-congruence-on-stat
  (implies (stat-equiv stat stat-equiv)
           (equal (exec-instr instr pc stat feat)
                  (exec-instr instr pc stat-equiv feat)))
  :rule-classes :congruence)

Theorem: exec-instr-of-feat-fix-feat

(defthm exec-instr-of-feat-fix-feat
  (equal (exec-instr instr pc stat (feat-fix feat))
         (exec-instr instr pc stat feat)))

Theorem: exec-instr-feat-equiv-congruence-on-feat

(defthm exec-instr-feat-equiv-congruence-on-feat
  (implies (feat-equiv feat feat-equiv)
           (equal (exec-instr instr pc stat feat)
                  (exec-instr instr pc stat feat-equiv)))
  :rule-classes :congruence)