/[gcl]/gcl/unixport/init_ansi_gcl.lsp.in
ViewVC logotype

Diff of /gcl/unixport/init_ansi_gcl.lsp.in

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.14 by camm, Sat Jul 23 08:56:26 2005 UTC revision 1.15 by pfdietz, Sat Aug 27 00:11:18 2005 UTC
# Line 211  Line 211 
211    
212  ;anything in "SYSTEM" which should go in "COMMON-LISP"  ;anything in "SYSTEM" which should go in "COMMON-LISP"
213  ;can be added to shadow-system  ;can be added to shadow-system
214   (setf shadow-system '(system::copy-structure))   (setf shadow-system '(system::copy-structure
215            system::define-compiler-macro
216            system::compiler-macro-function))
217    
218   (do-external-symbols (s "SYSTEM")   (do-external-symbols (s "SYSTEM")
219                        (when (member s shadow-system)                        (when (member s shadow-system)

Legend:
Removed from v.1.14  
changed lines
  Added in v.1.15

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26