Changeset 5795

Timestamp:

Jan 28, 2007, 12:42:10 AM (18 years ago)

Author:

Gary Byers

Message:

If a .cdb file can't be opened, show the translated pathname and mention the fact
that this might indicate a problem with "ccl:"'s logical translations.

File:

• trunk/ccl/lib/db-io.lisp (modified) (1 diff)

trunk/ccl/lib/db-io.lisp

@@ -381 +381 @@
       (cdb-check-trailer cdb))
     (progn
-      (warn "Interface file ~s does not exist." pathname)
+      (warn "Interface file ~s does not exist.~%This may mean that that the \"ccl:\" logical-pathname host has not been properly initialized. " (translate-logical-pathname pathname))
       (make-cdb :fid nil :pathname (namestring pathname)))))