diff options
author | stanton <stanton> | 1999-03-04 00:55:51 (GMT) |
---|---|---|
committer | stanton <stanton> | 1999-03-04 00:55:51 (GMT) |
commit | 0f95a59075710ed4b5a19a6be5fc8b879cae8103 (patch) | |
tree | e1d2dcbf37d458a8cc72db07064aa32c8ca1effc | |
parent | 7c8b031c9b40ec452fec961943512ef67fe72cab (diff) | |
download | tcl-0f95a59075710ed4b5a19a6be5fc8b879cae8103.zip tcl-0f95a59075710ed4b5a19a6be5fc8b879cae8103.tar.gz tcl-0f95a59075710ed4b5a19a6be5fc8b879cae8103.tar.bz2 |
* unix/tclUnixPort.h: Eliminated various Tclp* macros that have
been replaced with function defintions.
-rw-r--r-- | unix/tclUnixPort.h | 36 |
1 files changed, 1 insertions, 35 deletions
diff --git a/unix/tclUnixPort.h b/unix/tclUnixPort.h index ca8c815..baea748 100644 --- a/unix/tclUnixPort.h +++ b/unix/tclUnixPort.h @@ -19,7 +19,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclUnixPort.h,v 1.8 1998/09/29 18:22:39 rjohnson Exp $ + * RCS: @(#) $Id: tclUnixPort.h,v 1.8.4.1 1999/03/04 00:55:51 stanton Exp $ */ #ifndef _TCLUNIXPORT @@ -148,16 +148,6 @@ #endif /* - * The following defines denote malloc and free as the system calls - * used to allocate new memory. These defines are only used in the - * file tclCkalloc.c. - */ - -#define TclpAlloc(size) malloc(size) -#define TclpFree(ptr) free(ptr) -#define TclpRealloc(ptr, size) realloc(ptr, size) - -/* * The default platform eol translation on Unix is TCL_TRANSLATE_LF: */ @@ -300,15 +290,6 @@ EXTERN int gettimeofday _ANSI_ARGS_((struct timeval *tp, #endif /* - * On UNIX, there's no platform specific implementation of "TclpStat(...)" - * or "TclpAccess(...)". Simply call "stat(...)' and "access(...)" - * respectively. - */ - -#define TclpStat stat -#define TclpAccess access - -/* * On systems without symbolic links (i.e. S_IFLNK isn't defined) * define "lstat" to use "stat" instead. */ @@ -443,12 +424,6 @@ EXTERN int gettimeofday _ANSI_ARGS_((struct timeval *tp, #define TclPlatformExit(status) exit(status) /* - * The following functions always succeeds under Unix. - */ - -#define TclHasSockets(interp) (TCL_OK) - -/* * Variables provided by the C library: */ @@ -472,8 +447,6 @@ extern double strtod(); * standard Unix routines. */ -#define TclpGetDate(t,u) ((u) ? gmtime((t)) : localtime((t))) -#define TclStrftime(s,m,f,t) (strftime((s),(m),(f),(t))) #define TclpGetPid(pid) ((unsigned long) (pid)) #define TclpReleaseFile(file) @@ -484,11 +457,4 @@ extern double strtod(); #define TclpFinalize() -/* - * The following routine is only exported for testing purposes. - */ - -EXTERN int TclUnixWaitForFile _ANSI_ARGS_((int fd, int mask, - int timeout)); - #endif /* _TCLUNIXPORT */ |