X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Falloc.h;h=c4fd37a42658bac04aac1ba6ee8a095c90d1f638;hb=5f0bd05a15aaf93f46baf9b8aa3e9b0bfbca26ab;hp=0f2714c4c182b73bcac72dde52d194aba9cd6f05;hpb=cf4cb9554515c59eddbde38d1cf236339c37f55f;p=sbcl.git diff --git a/src/runtime/alloc.h b/src/runtime/alloc.h index 0f2714c..c4fd37a 100644 --- a/src/runtime/alloc.h +++ b/src/runtime/alloc.h @@ -14,11 +14,17 @@ #include "sbcl.h" #include "runtime.h" +#include "gc-internal.h" + +#ifdef LISP_FEATURE_GENCGC +extern lispobj *general_alloc(sword_t bytes, int page_type_flag); +#endif extern lispobj alloc_cons(lispobj car, lispobj cdr); -extern lispobj alloc_number(long n); +extern lispobj alloc_number(sword_t n); extern lispobj alloc_string(char *str); extern lispobj alloc_sap(void *ptr); extern lispobj alloc_base_string(char *str); +extern lispobj alloc_code_object(unsigned boxed, unsigned unboxed); #endif /* _ALLOC_H_ */