projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fix build on MinGW (again)
[sbcl.git]
/
src
/
runtime
/
gencgc-internal.h
diff --git
a/src/runtime/gencgc-internal.h
b/src/runtime/gencgc-internal.h
index
dfe9089
..
c7d8974
100644
(file)
--- a/
src/runtime/gencgc-internal.h
+++ b/
src/runtime/gencgc-internal.h
@@
-25,8
+25,8
@@
#include "genesis/code.h"
void gc_free_heap(void);
#include "genesis/code.h"
void gc_free_heap(void);
-inline page_index_t find_page_index(void *);
-inline void *page_address(page_index_t);
+extern page_index_t find_page_index(void *);
+extern void *page_address(page_index_t);
int gencgc_handle_wp_violation(void *);
\f
int gencgc_handle_wp_violation(void *);
\f
@@
-34,10
+34,12
@@
int gencgc_handle_wp_violation(void *);
# if GENCGC_CARD_BYTES > UINT_MAX
# error "GENCGC_CARD_BYTES unexpectedly large."
# else
# if GENCGC_CARD_BYTES > UINT_MAX
# error "GENCGC_CARD_BYTES unexpectedly large."
# else
-typedef unsigned int page_bytes_t;
+# define PAGE_BYTES_FMT "u"
+ typedef unsigned int page_bytes_t;
# endif
#else
# endif
#else
-typedef unsigned short page_bytes_t;
+# define PAGE_BYTES_FMT "hu"
+ typedef unsigned short page_bytes_t;
#endif
/* Note that this structure is also used from Lisp-side in
#endif
/* Note that this structure is also used from Lisp-side in
@@
-108,7
+110,7
@@
extern struct page *page_table;
\f
/* forward declarations */
\f
/* forward declarations */
-void sniff_code_object(struct code *code, unsigned long displacement);
+void sniff_code_object(struct code *code, os_vm_size_t displacement);
void gencgc_apply_code_fixups(struct code *old_code, struct code *new_code);
long update_dynamic_space_free_pointer(void);
void gencgc_apply_code_fixups(struct code *old_code, struct code *new_code);
long update_dynamic_space_free_pointer(void);