From: Christoph Egger <christoph@christoph-egger.org>
Date: Wed, 23 Jan 2013 05:02:59 +0000 (+0100)
Subject: Adapt cheneygc.c to type changes in gc-internal.h
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=f10d937a07cb7198852694de95fd14858fccb5d3;p=sbcl.git

Adapt cheneygc.c to type changes in gc-internal.h
---

diff --git a/src/runtime/cheneygc.c b/src/runtime/cheneygc.c
index 7573c82..14b5208 100644
--- a/src/runtime/cheneygc.c
+++ b/src/runtime/cheneygc.c
@@ -62,19 +62,19 @@ tv_diff(struct timeval *x, struct timeval *y)
 #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);
 }