summaryrefslogtreecommitdiffstats
path: root/unix
diff options
context:
space:
mode:
Diffstat (limited to 'unix')
-rw-r--r--unix/tclLoadAout.c8
-rw-r--r--unix/tclLoadDl.c10
-rw-r--r--unix/tclLoadDld.c8
-rw-r--r--unix/tclLoadDyld.c10
-rw-r--r--unix/tclLoadNext.c10
-rw-r--r--unix/tclLoadOSF.c8
-rw-r--r--unix/tclLoadShl.c10
7 files changed, 32 insertions, 32 deletions
diff --git a/unix/tclLoadAout.c b/unix/tclLoadAout.c
index b8fa8b6..301dce9 100644
--- a/unix/tclLoadAout.c
+++ b/unix/tclLoadAout.c
@@ -14,7 +14,7 @@
* and Design Engineering (MADE) Initiative through ARPA contract
* F33615-94-C-4400.
*
- * RCS: @(#) $Id: tclLoadAout.c,v 1.12 2002/07/18 15:04:53 vincentdarley Exp $
+ * RCS: @(#) $Id: tclLoadAout.c,v 1.13 2002/07/18 16:26:04 vincentdarley Exp $
*/
#include "tclInt.h"
@@ -142,7 +142,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
Tcl_Interp *interp; /* Used for error reporting. */
Tcl_Obj *pathPtr; /* Name of the file containing the desired
* code (UTF-8). */
- TclLoadHandle *loadHandle; /* Filled with token for dynamically loaded
+ Tcl_LoadHandle *loadHandle; /* Filled with token for dynamically loaded
* file which will be passed back to
* (*unloadProcPtr)() to unload the file. */
Tcl_FSUnloadFileProc **unloadProcPtr;
@@ -327,7 +327,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
Tcl_PackageInitProc*
TclpFindSymbol(interp, loadHandle, symbol)
Tcl_Interp *interp;
- TclLoadHandle loadHandle;
+ Tcl_LoadHandle loadHandle;
CONST char *symbol;
{
/* Look up the entry point in the load module's dictionary. */
@@ -462,7 +462,7 @@ UnlinkSymbolTable ()
void
TclpUnloadFile(loadHandle)
- TclLoadHandle loadHandle; /* loadHandle returned by a previous call
+ Tcl_LoadHandle loadHandle; /* loadHandle returned by a previous call
* to TclpDlopen(). The loadHandle is
* a token that represents the loaded
* file. */
diff --git a/unix/tclLoadDl.c b/unix/tclLoadDl.c
index c7402aa..2f1d4e2 100644
--- a/unix/tclLoadDl.c
+++ b/unix/tclLoadDl.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: tclLoadDl.c,v 1.11 2002/07/18 15:04:53 vincentdarley Exp $
+ * RCS: @(#) $Id: tclLoadDl.c,v 1.12 2002/07/18 16:26:04 vincentdarley Exp $
*/
#include "tclInt.h"
@@ -58,7 +58,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
Tcl_Interp *interp; /* Used for error reporting. */
Tcl_Obj *pathPtr; /* Name of the file containing the desired
* code (UTF-8). */
- TclLoadHandle *loadHandle; /* Filled with token for dynamically loaded
+ Tcl_LoadHandle *loadHandle; /* Filled with token for dynamically loaded
* file which will be passed back to
* (*unloadProcPtr)() to unload the file. */
Tcl_FSUnloadFileProc **unloadProcPtr;
@@ -80,7 +80,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
}
*unloadProcPtr = &TclpUnloadFile;
- *loadHandle = (TclLoadHandle)handle;
+ *loadHandle = (Tcl_LoadHandle)handle;
return TCL_OK;
}
@@ -102,7 +102,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
Tcl_PackageInitProc*
TclpFindSymbol(interp, loadHandle, symbol)
Tcl_Interp *interp;
- TclLoadHandle loadHandle;
+ Tcl_LoadHandle loadHandle;
CONST char *symbol;
{
CONST char *native;
@@ -151,7 +151,7 @@ TclpFindSymbol(interp, loadHandle, symbol)
void
TclpUnloadFile(loadHandle)
- TclLoadHandle loadHandle; /* loadHandle returned by a previous call
+ Tcl_LoadHandle loadHandle; /* loadHandle returned by a previous call
* to TclpDlopen(). The loadHandle is
* a token that represents the loaded
* file. */
diff --git a/unix/tclLoadDld.c b/unix/tclLoadDld.c
index de0ab6d..9603e7e 100644
--- a/unix/tclLoadDld.c
+++ b/unix/tclLoadDld.c
@@ -12,7 +12,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclLoadDld.c,v 1.10 2002/07/18 15:04:53 vincentdarley Exp $
+ * RCS: @(#) $Id: tclLoadDld.c,v 1.11 2002/07/18 16:26:04 vincentdarley Exp $
*/
#include "tclInt.h"
@@ -50,7 +50,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
Tcl_Interp *interp; /* Used for error reporting. */
Tcl_Obj *pathPtr; /* Name of the file containing the desired
* code (UTF-8). */
- TclLoadHandle *loadHandle; /* Filled with token for dynamically loaded
+ Tcl_LoadHandle *loadHandle; /* Filled with token for dynamically loaded
* file which will be passed back to
* (*unloadProcPtr)() to unload the file. */
Tcl_FSUnloadFileProc **unloadProcPtr;
@@ -114,7 +114,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
Tcl_PackageInitProc*
TclpFindSymbol(interp, loadHandle, symbol)
Tcl_Interp *interp;
- TclLoadHandle loadHandle;
+ Tcl_LoadHandle loadHandle;
CONST char *symbol;
{
return (Tcl_PackageInitProc *) dld_get_func(symbol);
@@ -140,7 +140,7 @@ TclpFindSymbol(interp, loadHandle, symbol)
void
TclpUnloadFile(loadHandle)
- TclLoadHandle loadHandle; /* loadHandle returned by a previous call
+ Tcl_LoadHandle loadHandle; /* loadHandle returned by a previous call
* to TclpDlopen(). The loadHandle is
* a token that represents the loaded
* file. */
diff --git a/unix/tclLoadDyld.c b/unix/tclLoadDyld.c
index e220525..600bbb3 100644
--- a/unix/tclLoadDyld.c
+++ b/unix/tclLoadDyld.c
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclLoadDyld.c,v 1.10 2002/07/18 15:04:53 vincentdarley Exp $
+ * RCS: @(#) $Id: tclLoadDyld.c,v 1.11 2002/07/18 16:26:04 vincentdarley Exp $
*/
#include "tclInt.h"
@@ -41,7 +41,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
Tcl_Interp *interp; /* Used for error reporting. */
Tcl_Obj *pathPtr; /* Name of the file containing the desired
* code (UTF-8). */
- TclLoadHandle *loadHandle; /* Filled with token for dynamically loaded
+ Tcl_LoadHandle *loadHandle; /* Filled with token for dynamically loaded
* file which will be passed back to
* (*unloadProcPtr)() to unload the file. */
Tcl_FSUnloadFileProc **unloadProcPtr;
@@ -64,7 +64,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
Tcl_AppendResult(interp, msg, (char *) NULL);
return TCL_ERROR;
}
- *loadHandle = (TclLoadHandle)dyld_lib;
+ *loadHandle = (Tcl_LoadHandle)dyld_lib;
*unloadProcPtr = &TclpUnloadFile;
return TCL_OK;
}
@@ -87,7 +87,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
Tcl_PackageInitProc*
TclpFindSymbol(interp, loadHandle, symbol)
Tcl_Interp *interp;
- TclLoadHandle loadHandle;
+ Tcl_LoadHandle loadHandle;
CONST char *symbol;
{
NSSymbol nsSymbol;
@@ -137,7 +137,7 @@ TclpFindSymbol(interp, loadHandle, symbol)
void
TclpUnloadFile(loadHandle)
- TclLoadHandle loadHandle; /* loadHandle returned by a previous call
+ Tcl_LoadHandle loadHandle; /* loadHandle returned by a previous call
* to TclpDlopen(). The loadHandle is
* a token that represents the loaded
* file. */
diff --git a/unix/tclLoadNext.c b/unix/tclLoadNext.c
index 67d7e18..699cfb3 100644
--- a/unix/tclLoadNext.c
+++ b/unix/tclLoadNext.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: tclLoadNext.c,v 1.9 2002/07/18 15:04:54 vincentdarley Exp $
+ * RCS: @(#) $Id: tclLoadNext.c,v 1.10 2002/07/18 16:26:04 vincentdarley Exp $
*/
#include "tclInt.h"
@@ -40,7 +40,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
Tcl_Interp *interp; /* Used for error reporting. */
Tcl_Obj *pathPtr; /* Name of the file containing the desired
* code (UTF-8). */
- TclLoadHandle *loadHandle; /* Filled with token for dynamically loaded
+ Tcl_LoadHandle *loadHandle; /* Filled with token for dynamically loaded
* file which will be passed back to
* (*unloadProcPtr)() to unload the file. */
Tcl_FSUnloadFileProc **unloadProcPtr;
@@ -63,7 +63,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
}
NXCloseMemory(errorStream,NX_FREEBUFFER);
- *loadHandle = (TclLoadHandle)1; /* A dummy non-NULL value */
+ *loadHandle = (Tcl_LoadHandle)1; /* A dummy non-NULL value */
*unloadProcPtr = &TclpUnloadFile;
return TCL_OK;
@@ -87,7 +87,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
Tcl_PackageInitProc*
TclpFindSymbol(interp, loadHandle, symbol)
Tcl_Interp *interp;
- TclLoadHandle loadHandle;
+ Tcl_LoadHandle loadHandle;
CONST char *symbol;
{
Tcl_PackageInitProc *proc=NULL;
@@ -119,7 +119,7 @@ TclpFindSymbol(interp, loadHandle, symbol)
void
TclpUnloadFile(loadHandle)
- TclLoadHandle loadHandle; /* loadHandle returned by a previous call
+ Tcl_LoadHandle loadHandle; /* loadHandle returned by a previous call
* to TclpDlopen(). The loadHandle is
* a token that represents the loaded
* file. */
diff --git a/unix/tclLoadOSF.c b/unix/tclLoadOSF.c
index 45d8ad6..7e7c6d4 100644
--- a/unix/tclLoadOSF.c
+++ b/unix/tclLoadOSF.c
@@ -31,7 +31,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclLoadOSF.c,v 1.9 2002/07/18 15:04:54 vincentdarley Exp $
+ * RCS: @(#) $Id: tclLoadOSF.c,v 1.10 2002/07/18 16:26:04 vincentdarley Exp $
*/
#include "tclInt.h"
@@ -61,7 +61,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
Tcl_Interp *interp; /* Used for error reporting. */
Tcl_Obj *pathPtr; /* Name of the file containing the desired
* code (UTF-8). */
- TclLoadHandle *loadHandle; /* Filled with token for dynamically loaded
+ Tcl_LoadHandle *loadHandle; /* Filled with token for dynamically loaded
* file which will be passed back to
* (*unloadProcPtr)() to unload the file. */
Tcl_FSUnloadFileProc **unloadProcPtr;
@@ -118,7 +118,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
Tcl_PackageInitProc*
TclpFindSymbol(interp, loadHandle, symbol)
Tcl_Interp *interp;
- TclLoadHandle loadHandle;
+ Tcl_LoadHandle loadHandle;
CONST char *symbol;
{
return ldr_lookup_package((char *)loadHandle, symbol);
@@ -144,7 +144,7 @@ TclpFindSymbol(interp, loadHandle, symbol)
void
TclpUnloadFile(loadHandle)
- TclLoadHandle loadHandle; /* loadHandle returned by a previous call
+ Tcl_LoadHandle loadHandle; /* loadHandle returned by a previous call
* to TclpDlopen(). The loadHandle is
* a token that represents the loaded
* file. */
diff --git a/unix/tclLoadShl.c b/unix/tclLoadShl.c
index 9baadc6..84ef9fa 100644
--- a/unix/tclLoadShl.c
+++ b/unix/tclLoadShl.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: tclLoadShl.c,v 1.11 2002/07/18 15:04:54 vincentdarley Exp $
+ * RCS: @(#) $Id: tclLoadShl.c,v 1.12 2002/07/18 16:26:04 vincentdarley Exp $
*/
#include <dl.h>
@@ -48,7 +48,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
Tcl_Interp *interp; /* Used for error reporting. */
Tcl_Obj *pathPtr; /* Name of the file containing the desired
* code (UTF-8). */
- TclLoadHandle *loadHandle; /* Filled with token for dynamically loaded
+ Tcl_LoadHandle *loadHandle; /* Filled with token for dynamically loaded
* file which will be passed back to
* (*unloadProcPtr)() to unload the file. */
Tcl_FSUnloadFileProc **unloadProcPtr;
@@ -77,7 +77,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
"\": ", Tcl_PosixError(interp), (char *) NULL);
return TCL_ERROR;
}
- *loadHandle = (TclLoadHandle) handle;
+ *loadHandle = (Tcl_LoadHandle) handle;
*unloadProcPtr = &TclpUnloadFile;
return TCL_OK;
}
@@ -100,7 +100,7 @@ TclpDlopen(interp, pathPtr, loadHandle, unloadProcPtr)
Tcl_PackageInitProc*
TclpFindSymbol(interp, loadHandle, symbol)
Tcl_Interp *interp;
- TclLoadHandle loadHandle;
+ Tcl_LoadHandle loadHandle;
CONST char *symbol;
{
Tcl_DString newName;
@@ -146,7 +146,7 @@ TclpFindSymbol(interp, loadHandle, symbol)
void
TclpUnloadFile(loadHandle)
- TclLoadHandle loadHandle; /* loadHandle returned by a previous call
+ Tcl_LoadHandle loadHandle; /* loadHandle returned by a previous call
* to TclpDlopen(). The loadHandle is
* a token that represents the loaded
* file. */