From 0f95a59075710ed4b5a19a6be5fc8b879cae8103 Mon Sep 17 00:00:00 2001 From: stanton Date: Thu, 4 Mar 1999 00:55:51 +0000 Subject: * unix/tclUnixPort.h: Eliminated various Tclp* macros that have been replaced with function defintions. --- unix/tclUnixPort.h | 36 +----------------------------------- 1 file changed, 1 insertion(+), 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 */ -- cgit v0.12