hms/hsim
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

feat: some ideas on resets

Browse source
This commit is contained in:
Henri Saudubray 2025-06-27 15:31:47 +02:00
parent ac4e066bf8
commit 8f6320b30e
Signed by: hms
GPG key ID: 7065F57ED8856128
4 changed files with 24 additions and 21 deletions
Download patch file Download diff file Expand all files Collapse all files

11
src/bin/main.ml
View file

@ -64,10 +64,11 @@ let m =
try
if !zelus then
match !model with
| None -> Format.eprintf "Missing model\n"; exit 2
| Some "ballz" -> wrap_zelus (lift Ballz.main)
| Some "ballzm" -> wrap_zelus (lift_hsim Ballz_main.main)
| Some "sincosz" -> wrap_zelus (lift Sincosz.f)
| None -> Format.eprintf "Missing model\n"; exit 2
| Some "ballz" -> wrap_zelus (lift Ballz.main)
| Some "ballzm" -> wrap_zelus (lift_hsim Ballz_main.main)
| Some "sincosz" -> wrap_zelus (lift Sincosz.f)
| Some "sincoszm" -> wrap_zelus (lift_hsim Sincosz_main.main)
(* | Some "count" -> wrap_zelus (lift Count.count) *)
| Some s -> Format.eprintf "Unknown model: %s\n" s; exit 2
else
@ -86,7 +87,7 @@ let st = if !inplace then (module State.InPlaceSimState : State.SimState)
else (module State.FunctionalSimState : State.SimState)
let output =
if !no_print then Hsim.Utils.ignore
if !no_print || !zelus then Hsim.Utils.ignore
else if !speed then Output.print_h
else Output.print (* Output.ignore *)