diff options
author | davygrvy <davygrvy@noemail.net> | 2002-02-12 14:22:09 (GMT) |
---|---|---|
committer | davygrvy <davygrvy@noemail.net> | 2002-02-12 14:22:09 (GMT) |
commit | fe72b3a5e08db49bbe2a8ad57ae6337ecaf5b100 (patch) | |
tree | e271264a7d2a240921b9f282ebbb0ac8b72c1f73 /unix/tclUnixFCmd.c | |
parent | 5fffbb4dce11539b7de8fdfcc4b834f995d9abb7 (diff) | |
download | tcl-fe72b3a5e08db49bbe2a8ad57ae6337ecaf5b100.zip tcl-fe72b3a5e08db49bbe2a8ad57ae6337ecaf5b100.tar.gz tcl-fe72b3a5e08db49bbe2a8ad57ae6337ecaf5b100.tar.bz2 |
* djgpp/ (new directory)
* djgpp/Makefile (new):
* unix/tclAppInit.c:
* unix/tclMtherr.c:
* unix/tclUnixFCmd.c:
* unix/tclUnixFile.c:
* unix/tclUnixInit.c:
* unix/tclUnixPort.h: Early stage of DJGPP support for building
Tcl on DOS. Dynamic loading isn't working, yet. Requires watt32
for the TCP/IP stack. No autoconf, yet. Barely tested, but
makes a working exe that runs Tcl in protected-mode, flat memory.
[exec] and pipes will need the most work as multi-tasking on DOS
has to be carefully.
FossilOrigin-Name: 58a026b69c9d29a1332cd0f3a87386fdcf5f240f
Diffstat (limited to 'unix/tclUnixFCmd.c')
-rw-r--r-- | unix/tclUnixFCmd.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/unix/tclUnixFCmd.c b/unix/tclUnixFCmd.c index a48c2ee..768798e 100644 --- a/unix/tclUnixFCmd.c +++ b/unix/tclUnixFCmd.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclUnixFCmd.c,v 1.15 2002/01/25 20:40:56 dgp Exp $ + * RCS: @(#) $Id: tclUnixFCmd.c,v 1.16 2002/02/12 14:24:27 davygrvy Exp $ * * Portions of this code were derived from NetBSD source code which has * the following copyright notice: @@ -349,6 +349,7 @@ DoCopyFile(src, dst) } switch ((int) (srcStatBuf.st_mode & S_IFMT)) { +#ifndef DJGPP case S_IFLNK: { char link[MAXPATHLEN]; int length; @@ -363,6 +364,7 @@ DoCopyFile(src, dst) } break; } +#endif case S_IFBLK: case S_IFCHR: { if (mknod(dst, srcStatBuf.st_mode, /* INTL: Native. */ |