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

feat (exm): sincos example

Browse source
This commit is contained in:
Henri Saudubray 2025-04-29 15:33:57 +02:00
parent 9a0d22e880
commit d398989ece
Signed by: hms
GPG key ID: 7065F57ED8856128
6 changed files with 87 additions and 58 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/lib/common/debug.ml
View file

@ -1,7 +1,4 @@
let debug = ref false
let fmt () = if !debug then Format.std_formatter
else Format.make_formatter (fun _ _ _ -> ()) (fun () -> ())
let print = Format.fprintf (fmt ()) "%s"
let print s = if !debug then Format.printf "%s\n" s else ()