Skip to content
Snippets Groups Projects
Commit bd1c8820 authored by pmai's avatar pmai
Browse files

Print a warning if we can't find a core file in the specified CMUCLLIB

path and therefore fall back to the default path.  Doing this
fall-back silently can confuse users no end...
parent e2fadfad
No related branches found
No related tags found
No related merge requests found
/*
* main() entry point for a stand alone lisp image.
*
* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/lisp.c,v 1.24 2001/11/29 01:46:59 pmai Exp $
* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/lisp.c,v 1.25 2002/01/29 01:23:33 pmai Exp $
*
*/
......@@ -174,6 +174,10 @@ int main(int argc, char *argv[], char *envp[])
break;
}
} while (*lib++ == ':');
if (core == NULL)
fprintf(stderr, "WARNING: Couldn't find core in specified CMUCLLIB, using default path.\n");
}
if (core == NULL) {
/* Note: the /usr/misc/.cmucl/lib/ default path is also wired
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment