summaryrefslogtreecommitdiffstats
path: root/unix/tclLoadDyld.c
diff options
context:
space:
mode:
Diffstat (limited to 'unix/tclLoadDyld.c')
-rw-r--r--unix/tclLoadDyld.c10
1 files changed, 5 insertions, 5 deletions
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. */