diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-07-25 09:01:05 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-07-25 09:01:05 (GMT) |
| commit | 62c64586b62f23ff1c769bc9a0a3c44e9d0adc5d (patch) | |
| tree | 9a2638b8949cdf71c9e5278d7bdef31d8854665b /unix | |
| parent | 810eeec19d827e3162bea26dc073c0ca99819f77 (diff) | |
| parent | 37feaf8aeca6ecef96e01f328eda73a61ad11470 (diff) | |
| download | tcl-62c64586b62f23ff1c769bc9a0a3c44e9d0adc5d.zip tcl-62c64586b62f23ff1c769bc9a0a3c44e9d0adc5d.tar.gz tcl-62c64586b62f23ff1c769bc9a0a3c44e9d0adc5d.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'unix')
| -rw-r--r-- | unix/tclLoadAix.c | 20 | ||||
| -rw-r--r-- | unix/tclUnixCompat.c | 12 | ||||
| -rw-r--r-- | unix/tclUnixInit.c | 2 | ||||
| -rw-r--r-- | unix/tclUnixThrd.c | 2 |
4 files changed, 18 insertions, 18 deletions
diff --git a/unix/tclLoadAix.c b/unix/tclLoadAix.c index e5d9729..fea9494 100644 --- a/unix/tclLoadAix.c +++ b/unix/tclLoadAix.c @@ -98,7 +98,7 @@ dlopen( const char *path, int mode) { - register ModulePtr mp; + ModulePtr mp; static void *mainModule; /* @@ -191,7 +191,7 @@ dlopen( */ if (mode & RTLD_GLOBAL) { - register ModulePtr mp1; + ModulePtr mp1; for (mp1 = mp->next; mp1; mp1 = mp1->next) { if (loadbind(0, mp1->entry, mp->entry) == -1) { @@ -243,7 +243,7 @@ static void caterr( char *s) { - register char *p = s; + char *p = s; while (*p >= '0' && *p <= '9') { p++; @@ -282,9 +282,9 @@ dlsym( void *handle, const char *symbol) { - register ModulePtr mp = (ModulePtr)handle; - register ExportPtr ep; - register int i; + ModulePtr mp = (ModulePtr)handle; + ExportPtr ep; + int i; /* * Could speed up the search, but I assume that one assigns the result to @@ -317,9 +317,9 @@ int dlclose( void *handle) { - register ModulePtr mp = (ModulePtr)handle; + ModulePtr mp = (ModulePtr)handle; int result; - register ModulePtr mp1; + ModulePtr mp1; if (--mp->refCnt > 0) { return 0; @@ -343,8 +343,8 @@ dlclose( } if (mp->exports) { - register ExportPtr ep; - register int i; + ExportPtr ep; + int i; for (ep = mp->exports, i = mp->nExports; i; i--, ep++) { if (ep->name) { free(ep->name); diff --git a/unix/tclUnixCompat.c b/unix/tclUnixCompat.c index c63b485..9b8acc9 100644 --- a/unix/tclUnixCompat.c +++ b/unix/tclUnixCompat.c @@ -683,8 +683,8 @@ CopyGrp( char *buf, int buflen) { - register char *p = buf; - register int copied, len = 0; + char *p = buf; + int copied, len = 0; /* * Copy username. @@ -885,7 +885,7 @@ CopyArray( int buflen) /* Size of buffer. */ { int i, j, len = 0; - char *p, **new; + char *p, **newBuffer; if (src == NULL) { return 0; @@ -901,7 +901,7 @@ CopyArray( return -1; } - new = (char **) buf; + newBuffer = (char **) buf; p = buf + len; for (j = 0; j < i; j++) { @@ -912,10 +912,10 @@ CopyArray( return -1; } memcpy(p, src[j], sz); - new[j] = p; + newBuffer[j] = p; p = buf + len; } - new[j] = NULL; + newBuffer[j] = NULL; return len; } diff --git a/unix/tclUnixInit.c b/unix/tclUnixInit.c index be507a6..739290e 100644 --- a/unix/tclUnixInit.c +++ b/unix/tclUnixInit.c @@ -1000,7 +1000,7 @@ TclpFindVariable( * searches). */ { size_t i, result = TCL_IO_FAILURE; - register const char *env, *p1, *p2; + const char *env, *p1, *p2; Tcl_DString envString; Tcl_DStringInit(&envString); diff --git a/unix/tclUnixThrd.c b/unix/tclUnixThrd.c index 74fdaed..afb8b1c 100644 --- a/unix/tclUnixThrd.c +++ b/unix/tclUnixThrd.c @@ -788,7 +788,7 @@ Tcl_Mutex * TclpNewAllocMutex(void) { AllocMutex *lockPtr; - register PMutex *plockPtr; + PMutex *plockPtr; lockPtr = malloc(sizeof(AllocMutex)); if (lockPtr == NULL) { |