1 of 7 registered words modeled, partially: (FIND)'s two concretely- decidable failure branches (invalid address; invalid length-derived range). Its "found" branch, and VOCABULARY/DEFINITIONS/CONTEXT/CURRENT/ FORTH/ORDER entirely, are deferred. Genuine finding: this is the 7th and by far most severe occurrence of the file-scope-static-instead-of-per-VM-field bug pattern in this sweep. The ENTIRE vocabulary subsystem (forth_vocab/context_vocab/current_vocab, context_var_addr/current_var_addr, the first-character search index) is file-scope C statics, not struct VM fields. In the Tripod multi-VM fleet, one VM's VOCABULARY/DEFINITIONS/FORTH silently changes where every other VM looks up and defines words -- a correctness hazard in ordinary word resolution for the whole fleet, not just a diagnostic-flag leak like the smaller prior instances. init_vocabulary_system's `static int initialized` guard compounds this: only the first VM to touch any vocabulary word seeds the vocabulary roots, from its own dictionary.
39 lines
1.1 KiB
Plaintext
39 lines
1.1 KiB
Plaintext
session "StarForth" = "HOL-Library" +
|
|
description "Formal proofs of StarForth FORTH-79 primitive correctness and physics-loop invariants"
|
|
theories [document = false]
|
|
StarForth_Base
|
|
StarForth_Q48_16
|
|
StarForth_Stack_Words
|
|
StarForth_Double_Words
|
|
StarForth_Arithmetic_Words
|
|
StarForth_Mixed_Arithmetic_Words
|
|
StarForth_Logical_Words
|
|
StarForth_Return_Stack_Words
|
|
StarForth_Memory_Words
|
|
StarForth_Dictionary_Words
|
|
StarForth_Dictionary_Manipulation_Words
|
|
StarForth_Control_Words
|
|
StarForth_String_Words
|
|
StarForth_Block_Words
|
|
StarForth_IO_Words
|
|
StarForth_Editor_Words
|
|
StarForth_Format_Words
|
|
StarForth_System_Words
|
|
StarForth_Vocabulary_Words
|
|
StarForth_Mutex
|
|
StarForth_Transition
|
|
StarForth_Loop1_Heat
|
|
StarForth_Loop2_Window
|
|
StarForth_Loop3_Decay
|
|
StarForth_Loop4_Pipeline
|
|
StarForth_Loop5_WinInf
|
|
StarForth_Loop6_DecayInf
|
|
StarForth_Loop7_Heartrate
|
|
StarForth_Concurrent
|
|
StarForth_Correctness
|
|
ACL_Pin_Monotone
|
|
ACL_Inherit_Clears_Pin
|
|
ACL_TTL_Bounded
|
|
ACL_Emergency_Bypass
|
|
ACL_No_Escalation
|