Adds the function log10

Author: modlfo

src/core/env.ml

@@ -585,6 +585,7 @@ let builtin_table =
    ; [ "makeArray" ], Scope.Function, Typ.Const.array_make (), false
    ; [ "abs" ], Scope.Function, Typ.Const.freal_freal (), false
    ; [ "exp" ], Scope.Function, Typ.Const.freal_freal (), false
+   ; [ "log10" ], Scope.Function, Typ.Const.freal_freal (), false
    ; [ "sin" ], Scope.Function, Typ.Const.freal_freal (), false
    ; [ "cos" ], Scope.Function, Typ.Const.freal_freal (), false
    ; [ "floor" ], Scope.Function, Typ.Const.freal_freal (), false

src/core/interpreter.ml

@@ -547,6 +547,7 @@ let builtinFunctions (a : Args.args) env =
    in
    let functions =
       [ "abs", Env.Builtin (real_real abs_float)
+      ; "log10", Env.Builtin (real_real log10)
       ; "exp", Env.Builtin (real_real exp)
       ; "sin", Env.Builtin (real_real sin)
       ; "cos", Env.Builtin (real_real cos)

src/generators/defaultReplacements.ml

@@ -128,6 +128,7 @@ module Default = struct
          ; ("msu", "float"), "float_msu"
          ; ("abs", "float"), "fabsf"
          ; ("exp", "float"), "expf"
+         ; ("log10", "float"), "log10f"
          ; ("floor", "float"), "floorf"
          ; ("max", "float"), "fmax"
          ; ("min", "float"), "fmin"

src/version.ml

@@ -1 +1 @@
-let version = "\nv0.4.4\n"
+let version = "\nv0.4.5\n"