1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
|
/* $Header: /home/CVS-cmucl/src/lisp/core.h,v 1.3 1994/03/27 15:17:54 hallgren Exp $ */
#ifndef _CORE_H_
#define _CORE_H_
#include "lisp.h"
#define CORE_PAGESIZE OS_VM_DEFAULT_PAGESIZE
#define CORE_MAGIC (('C' << 24) | ('O' << 16) | ('R' << 8) | 'E')
#define CORE_END 3840
#define CORE_NDIRECTORY 3861
#define CORE_VALIDATE 3845
#define CORE_VERSION 3860
#define CORE_MACHINE_STATE 3862
#define CORE_INITIAL_FUNCTION 3863
#define DYNAMIC_SPACE_ID (1)
#define STATIC_SPACE_ID (2)
#define READ_ONLY_SPACE_ID (3)
struct ndir_entry {
#ifndef alpha
long identifier;
long nwords;
long data_page;
long address;
long page_count;
#else
u32 identifier;
u32 nwords;
u32 data_page;
u32 address;
u32 page_count;
#endif
};
extern lispobj load_core_file(char *file);
#endif
|
