Move control-stack scavenging to gc-common.c.

[sbcl.git] / src / runtime / gc-internal.h

diff --git a/src/runtime/gc-internal.h b/src/runtime/gc-internal.h
index 5439df9..3d0bfb7 100644 (file)
--- a/src/runtime/gc-internal.h
+++ b/src/runtime/gc-internal.h
@@ -132,6 +132,7 @@ lispobj *gc_search_space(lispobj *start, size_t words, lispobj *pointer);
 
 extern int looks_like_valid_lisp_pointer_p(lispobj pointer, lispobj *start_addr);
 
+extern void scavenge_control_stack(struct thread *th);
 extern void scrub_control_stack();
 
 #include "fixnump.h"