version 1.1, 1996/08/19 05:47:26 |
version 1.2, 1996/08/19 06:34:03 |
|
|
/* to directory */ |
/* to directory */ |
if (stat (tn, &ts) < 0) |
if (stat (tn, &ts) < 0) |
quiterr (1, tn); |
quiterr (1, tn); |
#ifdef S_ISDIR |
|
if (!(S_ISDIR(ts.st_mode))) |
if (!(S_ISDIR(ts.st_mode))) |
#else |
|
if (!(ts.st_mode & S_IFDIR)) |
|
#endif |
|
quit (2, "%s: Not a directory", tn); |
quit (2, "%s: Not a directory", tn); |
if (chdir (tn) < 0) |
if (chdir (tn) < 0) |
quiterr (1, tn); |
quiterr (1, tn); |
|
|
/* from directory */ |
/* from directory */ |
if (stat (fn, &fs) < 0) |
if (stat (fn, &fs) < 0) |
quiterr (1, fn); |
quiterr (1, fn); |
#ifdef S_ISDIR |
|
if (!(S_ISDIR(fs.st_mode))) |
if (!(S_ISDIR(fs.st_mode))) |
#else |
|
if (!(fs.st_mode & S_IFDIR)) |
|
#endif |
|
quit (2, "%s: Not a directory", fn); |
quit (2, "%s: Not a directory", fn); |
|
|
exit (dodir (fn, &fs, &ts, 0)); |
exit (dodir (fn, &fs, &ts, 0)); |