theory JVMExec imports JVMExecInstr JVMExceptions begin
fun
exec :: "jvm_prog × jvm_state => jvm_state option" 🍋‹exec is not recursive. fun is just used for pattern matching› where "exec (G, xp, hp, []) = None"
| "exec (G, None, hp, (stk,loc,C,sig,pc)#frs) = (let i = fst(snd(snd(snd(snd(the(method (G,C) sig)))))) ! pc; (xcpt', hp', frs') = exec_instr i G hp stk loc C sig pc frs in Some (find_handler G xcpt' hp' frs'))"
| "exec (G, Some xp, hp, frs) = None"
definition exec_all :: "[jvm_prog,jvm_state,jvm_state] => bool"
(‹_ ⊨ _ ←-jvm→ _› [61,61,61]60) where "G ⊨ s ←-jvm→ t == (s,t) ∈ {(s,t). exec(G,s) = Some t}🪙*"
text‹ The start configuration of the JVM: in the start heap, we call a method ‹m›of class ‹C› in program ‹G›. The ‹this›pointer of the frame is set to ‹Null› to simulate a static method invokation. › definition start_state :: "jvm_prog ==> cname ==> mname ==> jvm_state"where "start_state G C m ≡ let (C',rT,mxs,mxl,i,et) = the (method (G,C) (m,[])) in (None, start_heap G, [([], Null # replicate mxl undefined, C, (m,[]), 0)])"
end
Messung V0.5 in Prozent
¤ Dauer der Verarbeitung: 0.13 Sekunden
(vorverarbeitet am 2026-05-01)
¤
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung und die Messung sind noch experimentell.
