st/pass_strategy_synthesis
1
0
Fork 0
mirror of https://github.com/ProgramSnail/pass_strategy_synthesis.git synced 2025-12-31 05:08:15 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

interpretera, logic & abstract types draft, fixes

Browse source
This commit is contained in:
ProgramSnail 2025-12-09 16:40:20 +03:00
parent 658415536b
commit 1c74f0c3ef
5 changed files with 112 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lib/lib_next.ml
View file

@ -69,7 +69,7 @@ let init_state prog = { s_func = prog.p_func |> List.to_seq |> M.of_seq;
(* s_value = UnitV; *)
};;
let find_func name state = M.find_opt name state.s_func
let find_func name state = M.find_opt name state.s_func;;
let find_frame_var name frame = M.find_opt name frame.f_vars;;
let rec find_frames_var name frames =