|
|
1.1 ! root 1: /* Mark end of data space to dump as pure, for GNU Emacs. ! 2: Copyright (C) 1985 Free Software Foundation, Inc. ! 3: ! 4: This file is part of GNU Emacs. ! 5: ! 6: GNU Emacs is free software; you can redistribute it and/or modify ! 7: it under the terms of the GNU General Public License as published by ! 8: the Free Software Foundation; either version 1, or (at your option) ! 9: any later version. ! 10: ! 11: GNU Emacs is distributed in the hope that it will be useful, ! 12: but WITHOUT ANY WARRANTY; without even the implied warranty of ! 13: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ! 14: GNU General Public License for more details. ! 15: ! 16: You should have received a copy of the GNU General Public License ! 17: along with GNU Emacs; see the file COPYING. If not, write to ! 18: the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ ! 19: ! 20: ! 21: /* How this works: ! 22: ! 23: Fdump_emacs dumps everything up to my_edata as text space (pure). ! 24: ! 25: The files of Emacs are written so as to have no initialized ! 26: data that can ever need to be altered except at the first startup. ! 27: This is so that those words can be dumped as sharable text. ! 28: ! 29: It is not possible to exercise such control over library files. ! 30: So it is necessary to refrain from making their data areas shared. ! 31: Therefore, this file is loaded following all the files of Emacs ! 32: but before library files. ! 33: As a result, the symbol my_edata indicates the point ! 34: in data space between data coming from Emacs and data ! 35: coming from libraries. ! 36: */ ! 37: ! 38: #ifdef VMS ! 39: /* Prevent the file from being totally empty. */ ! 40: static dummy () {} ! 41: #endif ! 42: ! 43: char my_edata = 0;
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.