diff options
author | stanton <stanton> | 1999-03-04 01:01:57 (GMT) |
---|---|---|
committer | stanton <stanton> | 1999-03-04 01:01:57 (GMT) |
commit | 8074a699cc242dd75d90b2f676eecd35a41b525c (patch) | |
tree | 04ec477faa3d4c429f33eba6eade67aaa22ac0ee /generic/tcl.decls | |
parent | fd1dfeea2918db576ed45426a57111aa09b7ed83 (diff) | |
download | tcl-8074a699cc242dd75d90b2f676eecd35a41b525c.zip tcl-8074a699cc242dd75d90b2f676eecd35a41b525c.tar.gz tcl-8074a699cc242dd75d90b2f676eecd35a41b525c.tar.bz2 |
* generic/tcl.decls: Added Mac specific declarations.
* generic/tclStubs.c:
* generic/tclStubInit.c: Added undefs for all of the TCL_MEM_DEBUG
macros to avoid conflicts with the stub names.
* generic/tclStubInit.c:
* generic/tclInt.h:
* generic/tclInt.decls: Moved some declarations out of the generic
and into the platform specific sections. Added missing
declarations and Mac specific declarations.
* generic/tclInt.h:
* generic/tclDate.c:
* generic/tclClock.c: Created a new opaque TclpTime_t type so
generic functions that depend on the format of time_t can appear
in the generic header files.
* generic/tclStubInit.c:
* generic/tclPanic.c:
* generic/tcl.h:
* generic/tcl.decls: renamed Tcl_Panic back to panic to avoid
incompatibilities in a patch release.
Diffstat (limited to 'generic/tcl.decls')
-rw-r--r-- | generic/tcl.decls | 62 |
1 files changed, 58 insertions, 4 deletions
diff --git a/generic/tcl.decls b/generic/tcl.decls index a398448..4217db5 100644 --- a/generic/tcl.decls +++ b/generic/tcl.decls @@ -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: tcl.decls,v 1.1 1999/03/03 00:38:38 stanton Exp $ +# RCS: @(#) $Id: tcl.decls,v 1.2 1999/03/04 01:01:57 stanton Exp $ library tcl @@ -634,10 +634,10 @@ declare 184 generic { Tcl_TcpAcceptProc *acceptProc, ClientData callbackData) } declare 185 generic { - void Tcl_Panic(char *format, ...) + void panic(char *format, ...) } declare 186 generic { - void Tcl_PanicVA(char *format, va_list argList) + void panicVA(char *format, va_list argList) } declare 187 generic { char * Tcl_ParseVar(Tcl_Interp *interp, char *string, char **termPtr) @@ -930,13 +930,67 @@ declare 274 generic { Tcl_Obj *CONST objv[], char *message) } - +############################################################################## # Define the platform specific public Tcl interface. These functions are # only available on the designated platform. interface tclPlat +################## +# Mac declarations + +# This is needed by the shells to handle Macintosh events. + +declare 0 mac { + void Tcl_MacSetEventProc(Tcl_MacConvertEventPtr procPtr) +} + +# These routines are useful for handling using scripts from resources +# in the application shell + +declare 1 mac { + char * Tcl_MacConvertTextResource(Handle resource) +} +declare 2 mac { + int Tcl_MacEvalResource(Tcl_Interp *interp, char *resourceName, \ + int resourceNumber, char *fileName) +} +declare 3 mac { + Handle Tcl_MacFindResource(Tcl_Interp *interp, long resourceType, \ + char *resourceName, int resourceNumber, char *resFileRef, \ + int * releaseIt) +} + +# These routines support the new OSType object type (i.e. the packed 4 +# character type and creator codes). + +declare 4 mac { + int Tcl_GetOSTypeFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, \ + OSType *osTypePtr) +} +declare 5 mac { + void Tcl_SetOSTypeObj(Tcl_Obj *objPtr, OSType osType) +} +declare 6 mac { + Tcl_Obj * Tcl_NewOSTypeObj(OSType osType) +} + +# These are not in MSL 2.1.2, so we need to export them from the +# Tcl shared library. They are found in the compat directory +# except the panic routine which is found in tclMacPanic.h. + +declare 7 mac { + int strncasecmp(CONST char *s1, CONST char *s2, size_t n) +} +declare 8 mac { + int strcasecmp(CONST char *s1, CONST char *s2) +} + + +#################### +# Unix declaractions + declare 0 unix { void Tcl_CreateFileHandler(int fd, int mask, Tcl_FileProc *proc, \ ClientData clientData) |