Add cast

quil-lang · Jul 5, 2024 · 8d99e39 · 8d99e39
1 parent 2c769f4
commit 8d99e39
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/function.lisp b/src/function.lisp
@@ -96,7 +96,7 @@ if (!setjmp(fatal_lisp_error_handler)) {
                                           (list "result"))))))
         (format nil "~a {~%~a~%}~%"
                 header
-                (format nil "    if (!fatal_sbcl_error_occurred && !~a(fatal_lisp_error_handler)) {
+                (format nil "    if (!fatal_sbcl_error_occurred && !~a((void **) fatal_lisp_error_handler)) {
         ~a
     } else {
         ~a