X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Falloc.h;h=c4fd37a42658bac04aac1ba6ee8a095c90d1f638;hb=HEAD;hp=361d5cb7d708509fe3a075b43e6a752a5bc1c124;hpb=e0697854ef9f4999c8585b64be1b282ce4725176;p=sbcl.git diff --git a/src/runtime/alloc.h b/src/runtime/alloc.h index 361d5cb..c4fd37a 100644 --- a/src/runtime/alloc.h +++ b/src/runtime/alloc.h @@ -12,12 +12,19 @@ #ifndef _ALLOC_H_ #define _ALLOC_H_ +#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_ */