Hi, Everybody,
Please reply to [EMAIL PROTECTED]
Here's the output I promised you. After site-init.lisp, you'll see the error
message I got from cmucl when it ran with this version of site-init.lisp.
Thanks.
Bill
Script started on Mon 28 Jul 2003 08:58:24 AM EDT
%cat site-init.lisp
;;; -*- Mode: Lisp; Package: System -*-
;;;
;;; **********************************************************************
;;; This code was written as part of the CMU Common Lisp project at
;;; Carnegie Mellon University, and has been placed in the public domain.
;;;
(ext:file-comment
"$Header: /home/CVS-cmucl/src/code/generic-site.lisp,v 1.15 2003/02/05
14:41:11 emarsden Exp $")
;;;
;;; **********************************************************************
;;;
;;; This file is installed as "library:site-init" in binary
;;; distributions of CMUCL.
;;;
(in-package "SYSTEM")
;;; Put your site name here...
(setq *short-site-name* "Unknown")
(setq *long-site-name* "Site name not initialized")
;;; We would appreciate it if each site establishes a local maintainer who can
;;; filter bug reports from novice users to make sure that they really have
;;; found a bug. Fill in the maintainer's address here..
(rplaca
(cdr (member :bugs *herald-items*))
'("Send questions and bug reports to your local CMUCL maintainer, " terpri
"or see <http://www.cons.org/cmucl/support.html>." terpri
"Loaded subsystems:" terpri))
;;; If you have sources installed on your system, un-comment the following form
;;; and change it to point to the source location. This will allow the Hemlock
;;; "Edit Definition" command and the debugger to find sources for functions in
;;; the core.
(setf (search-list "target:") "/opt/cmucl-18e/src")
%cmucl
Error in function COMMON-LISP::CONVERT:
Search-lists cannot expand into pathnames that have a name, type, or
version specified:
#p"/opt/cmucl-18e/src"
Restarts:
0: [CONTINUE] Return NIL from load of "library:site-init".
1: [ABORT ] Skip remaining initializations.
Debug (type H for help)
(COMMON-LISP::CONVERT "/opt/cmucl-18e/src")
Source: Error finding source:
Error in function DEBUG::GET-FILE-TOP-LEVEL-FORM: Source file no longer exists:
target:code/pathname.lisp.
0] ^DEnd-of-File on #<Stream for the Terminal>
Error flushed ...
0] (quit)
%
script done on Mon 28 Jul 2003 09:00:24 AM EDT