mirror of
https://github.com/Interlisp/maiko.git
synced 2026-01-25 11:36:31 +00:00
Remove FSERROR define as it is always on. (#96)
The FSERROR define is on all the time now. It was not controlling all of the functionality, with many places setting Lisp_errnno outside of the code controlled by the define.
This commit is contained in:
12
src/main.c
12
src/main.c
@@ -348,10 +348,8 @@ int main(int argc, char *argv[])
|
||||
Barf and print the command line if tha fails
|
||||
*/
|
||||
|
||||
#ifdef FSERROR
|
||||
/* For call makepathname */
|
||||
Lisp_errno = &Dummy_errno;
|
||||
#endif
|
||||
|
||||
i = 1;
|
||||
|
||||
@@ -666,9 +664,7 @@ int makepathname(char *src, char *dst)
|
||||
case '.':
|
||||
if (getcwd(dst, MAXPATHLEN) == 0)
|
||||
{ /* set working directory */
|
||||
#ifdef FSERROR
|
||||
*Lisp_errno = errno;
|
||||
#endif
|
||||
return (0);
|
||||
}
|
||||
switch (*(base + 1)) {
|
||||
@@ -688,11 +684,7 @@ int makepathname(char *src, char *dst)
|
||||
default: return (0);
|
||||
}
|
||||
case '~':
|
||||
#ifdef FSERROR
|
||||
ERRSETJMP(0);
|
||||
#else
|
||||
SETJMP(0);
|
||||
#endif
|
||||
if (*(base + 1) == '/') {
|
||||
/* path is "~/foo" */
|
||||
#ifdef DOS
|
||||
@@ -701,9 +693,7 @@ int makepathname(char *src, char *dst)
|
||||
TIMEOUT(pwd = getpwuid(getuid()));
|
||||
#endif /* DOS */
|
||||
if (pwd == NULL) {
|
||||
#ifdef FSERROR
|
||||
*Lisp_errno = errno;
|
||||
#endif
|
||||
return (0);
|
||||
}
|
||||
#ifndef DOS
|
||||
@@ -722,9 +712,7 @@ int makepathname(char *src, char *dst)
|
||||
TIMEOUT(pwd = getpwnam(name));
|
||||
#endif /* DOS */
|
||||
if (pwd == NULL) {
|
||||
#ifdef FSERROR
|
||||
*Lisp_errno = errno;
|
||||
#endif
|
||||
return (0);
|
||||
}
|
||||
#ifndef DOS
|
||||
|
||||
Reference in New Issue
Block a user