Symbols requiring CAMLextern for Windows

ocaml · Sep 27, 2022 · 6533b48 · 6533b48
1 parent 13dd6fd
commit 6533b48
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 4 deletions.
diff --git a/runtime/caml/backtrace_prim.h b/runtime/caml/backtrace_prim.h
@@ -81,7 +81,7 @@ void caml_debuginfo_location(debuginfo dbg, /*out*/ struct caml_loc_info * li);
 /* Allocate Caml_state->backtrace_buffer. Returns 0 on success, -1 otherwise */
 int caml_alloc_backtrace_buffer(void);
 
-void caml_free_backtrace_buffer(backtrace_slot *backtrace_buffer);
+CAMLextern void caml_free_backtrace_buffer(backtrace_slot *backtrace_buffer);
 
 #ifndef NATIVE_CODE
 /* These two functions are used by the bytecode runtime when loading

diff --git a/runtime/caml/fiber.h b/runtime/caml/fiber.h
@@ -248,7 +248,7 @@ void caml_maybe_expand_stack(void);
 CAMLextern void caml_free_stack(struct stack_info* stk);
 
 /* gc_regs_buckets is allocated on-demand by [maybe_expand_stack]. */
-void caml_free_gc_regs_buckets(value *gc_regs_buckets);
+CAMLextern void caml_free_gc_regs_buckets(value *gc_regs_buckets);
 
 #ifdef NATIVE_CODE
 void caml_get_stack_sp_pc (struct stack_info* stack,

diff --git a/runtime/caml/signals.h b/runtime/caml/signals.h
@@ -76,8 +76,8 @@ value caml_process_pending_actions_with_root_exn (value extra_root);
 void caml_init_signal_handling(void);
 void caml_init_signals();
 void caml_terminate_signals();
-void * caml_init_signal_stack(void);
-void caml_free_signal_stack(void *);
+CAMLextern void * caml_init_signal_stack(void);
+CAMLextern void caml_free_signal_stack(void *);
 
 /* These hooks are not modified after other threads are spawned. */
 CAMLextern void (*caml_enter_blocking_section_hook)(void);