X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Falloc.h;h=c4fd37a42658bac04aac1ba6ee8a095c90d1f638;hb=c8617f57d0413beb2890e94dabe227cef9c5ddad;hp=54f6902cdadbe6d0595c06f59a79cda6937387a6;hpb=26e8f33d8639e4de75e59e3aa30bbd7478d51a69;p=sbcl.git diff --git a/src/runtime/alloc.h b/src/runtime/alloc.h index 54f6902..c4fd37a 100644 --- a/src/runtime/alloc.h +++ b/src/runtime/alloc.h @@ -14,15 +14,17 @@ #include "sbcl.h" #include "runtime.h" +#include "gc-internal.h" #ifdef LISP_FEATURE_GENCGC -extern lispobj *alloc(long bytes); +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_ */