diff options
| author | Michele Calgaro <michele.calgaro@yahoo.it> | 2024-09-15 17:08:01 +0900 |
|---|---|---|
| committer | Michele Calgaro <michele.calgaro@yahoo.it> | 2024-09-15 17:41:12 +0900 |
| commit | 447ba91ce6753bafb85d154275fad538f9928281 (patch) | |
| tree | 5657cdfb3a4cdf1c07cc4abd4122cc7880cfc459 | |
| parent | 758ae2a6dc4ab68ae8e900133a58997f238cd849 (diff) | |
| download | tdeedu-447ba91ce6753bafb85d154275fad538f9928281.tar.gz tdeedu-447ba91ce6753bafb85d154275fad538f9928281.zip | |
Signed-off-by: Michele Calgaro <michele.calgaro@yahoo.it>
| -rw-r--r-- | kalzium/src/solver/modwrap.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/kalzium/src/solver/modwrap.c b/kalzium/src/solver/modwrap.c index 0ab5359e..e51ea3c5 100644 --- a/kalzium/src/solver/modwrap.c +++ b/kalzium/src/solver/modwrap.c @@ -21,8 +21,9 @@ #include <stdio.h> #include <string.h> -#include <caml/mlvalues.h> +#include <caml/alloc.h> #include <caml/callback.h> +#include <caml/mlvalues.h> char* solve_equation(const char * eq) { @@ -32,6 +33,6 @@ char* solve_equation(const char * eq) solve_equation_closure = caml_named_value("solve_equation"); } - return strdup(String_val(callback(*solve_equation_closure, copy_string(eq)) )); + return strdup(String_val(caml_callback(*solve_equation_closure, caml_copy_string(eq)) )); } |