1
0
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:
Bruce Mitchener
2020-12-18 00:33:20 +07:00
committed by GitHub
parent 53acd3f2b1
commit d4f72d96e1
49 changed files with 46 additions and 128 deletions

View File

@@ -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