#endif
void *
-gc_general_alloc(long bytes, int page_type_flag, int quick_p) {
+gc_general_alloc(word_t bytes, int page_type_flag, int quick_p) {
lispobj *new=new_space_free_pointer;
new_space_free_pointer+=(bytes/N_WORD_BYTES);
return new;
}
-lispobj copy_large_unboxed_object(lispobj object, long nwords) {
+lispobj copy_large_unboxed_object(lispobj object, sword_t nwords) {
return copy_object(object,nwords);
}
-lispobj copy_unboxed_object(lispobj object, long nwords) {
+lispobj copy_unboxed_object(lispobj object, sword_t nwords) {
return copy_object(object,nwords);
}
-lispobj copy_large_object(lispobj object, long nwords) {
+lispobj copy_large_object(lispobj object, sword_t nwords) {
return copy_object(object,nwords);
}