/[cmucl]/src/lisp/core.h
ViewVC logotype

Contents of /src/lisp/core.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.9 - (show annotations)
Tue Jan 20 03:58:11 2009 UTC (5 years, 2 months ago) by agoncharov
Branch: MAIN
CVS Tags: sparc-tramp-assem-base, post-merge-intl-branch, merged-unicode-utf16-extfmt-2009-06-11, intl-branch-working-2010-02-19-1000, unicode-string-buffer-impl-base, release-20b-pre1, release-20b-pre2, unicode-string-buffer-base, sparc-tramp-assem-2010-07-19, amd64-dd-start, release-19f-pre1, intl-2-branch-base, GIT-CONVERSION, cross-sol-x86-merged, label-2009-03-16, release-19f-base, merge-with-19f, intl-branch-working-2010-02-11-1000, RELEASE_20b, RELEASE_19f, release-20a-base, cross-sol-x86-base, snapshot-2010-12, snapshot-2010-11, snapshot-2011-09, snapshot-2011-06, snapshot-2011-07, snapshot-2011-04, snapshot-2011-02, snapshot-2011-03, snapshot-2011-01, pre-merge-intl-branch, snapshot-2010-05, snapshot-2010-04, snapshot-2010-07, snapshot-2010-06, snapshot-2010-01, snapshot-2010-03, snapshot-2010-02, snapshot-2010-08, label-2009-03-25, cross-sol-x86-2010-12-20, intl-branch-2010-03-18-1300, RELEASE_20a, release-20a-pre1, snapshot-2009-11, snapshot-2009-12, portable-clx-import-2009-06-16, cross-sparc-branch-base, intl-branch-base, portable-clx-base, snapshot-2009-08, snapshot-2009-02, snapshot-2009-07, snapshot-2009-05, snapshot-2009-04, HEAD
Branch point for: RELEASE-19F-BRANCH, portable-clx-branch, cross-sparc-branch, RELEASE-20B-BRANCH, unicode-string-buffer-branch, sparc-tramp-assem-branch, RELEASE-20A-BRANCH, amd64-dd-branch, unicode-string-buffer-impl-branch, intl-branch, cross-sol-x86-branch, intl-2-branch
Changes since 1.8: +2 -2 lines
File MIME type: text/plain
Use 'const char *' instead of 'char *' where appropriate
1 /* $Header: /tiger/var/lib/cvsroots/cmucl/src/lisp/core.h,v 1.9 2009/01/20 03:58:11 agoncharov Rel $ */
2
3 #ifndef _CORE_H_
4 #define _CORE_H_
5
6 #include "lisp.h"
7
8 #define CORE_PAGESIZE OS_VM_DEFAULT_PAGESIZE
9 #define CORE_MAGIC (('C' << 24) | ('O' << 16) | ('R' << 8) | 'E')
10 #define CORE_END 3840
11 #define CORE_NDIRECTORY 3861
12 #define CORE_VALIDATE 3845
13 #define CORE_VERSION 3860
14 #define CORE_MACHINE_STATE 3862
15 #define CORE_INITIAL_FUNCTION 3863
16
17 #define DYNAMIC_SPACE_ID (1)
18 #define STATIC_SPACE_ID (2)
19 #define READ_ONLY_SPACE_ID (3)
20
21 struct ndir_entry {
22 #if !(defined(alpha) || defined(__x86_64))
23 long identifier;
24 long nwords;
25 long data_page;
26 long address;
27 long page_count;
28 #else
29 u32 identifier;
30 u32 nwords;
31 u32 data_page;
32 u32 address;
33 u32 page_count;
34 #endif
35 };
36
37 extern lispobj load_core_file(const char *file, fpu_mode_t *fpu_type);
38
39 #endif /* _CORE_H_ */

  ViewVC Help
Powered by ViewVC 1.1.5