Raymond Toy pushed to branch sparc64-dev at cmucl / cmucl
Commits:
-
6be8c6f7
by Raymond Toy at 2016-12-28T10:48:39-08:00
1 changed file:
Changes:
... | ... | @@ -95,10 +95,10 @@ load_core_file(const char *file, fpu_mode_t* fpu_type) |
95 | 95 |
{
|
96 | 96 |
int fd = open(file, O_RDONLY), count;
|
97 | 97 |
|
98 |
-#if !(defined(alpha) || defined(__x86_64))
|
|
98 |
+#if !(defined(alpha) || defined(__x86_64) || defined(__sparcv9))
|
|
99 | 99 |
long header[CORE_PAGESIZE / sizeof(long)], val, len, *ptr;
|
100 | 100 |
#else
|
101 |
- u32 header[CORE_PAGESIZE / sizeof(u32)], val, len, *ptr;
|
|
101 |
+ uint32_t header[CORE_PAGESIZE / sizeof(uint32_t)], val, len, *ptr;
|
|
102 | 102 |
#endif
|
103 | 103 |
lispobj initial_function = NIL;
|
104 | 104 |
|
... | ... | @@ -154,10 +154,10 @@ load_core_file(const char *file, fpu_mode_t* fpu_type) |
154 | 154 |
|
155 | 155 |
case CORE_NDIRECTORY:
|
156 | 156 |
process_directory(fd, ptr,
|
157 |
-#if !(defined(alpha) || defined(__x86_64))
|
|
157 |
+#if !(defined(alpha) || defined(__x86_64) || defined(__sparcv9))
|
|
158 | 158 |
(len - 2) / (sizeof(struct ndir_entry) / sizeof(long)));
|
159 | 159 |
#else
|
160 |
- (len - 2) / (sizeof(struct ndir_entry) / sizeof(u32)));
|
|
160 |
+ (len - 2) / (sizeof(struct ndir_entry) / sizeof(uint32_t)));
|
|
161 | 161 |
#endif
|
162 | 162 |
break;
|
163 | 163 |
|