Fossil SCM

fossil-scm / compat / tcl-8.6 / generic / tclPlatDecls.h
Source Blame History 120 lines
955886f… mistachkin 1 /*
955886f… mistachkin 2 * tclPlatDecls.h --
955886f… mistachkin 3 *
955886f… mistachkin 4 * Declarations of platform specific Tcl APIs.
955886f… mistachkin 5 *
955886f… mistachkin 6 * Copyright (c) 1998-1999 by Scriptics Corporation.
955886f… mistachkin 7 * All rights reserved.
955886f… mistachkin 8 */
955886f… mistachkin 9
955886f… mistachkin 10 #ifndef _TCLPLATDECLS
955886f… mistachkin 11 #define _TCLPLATDECLS
955886f… mistachkin 12
955886f… mistachkin 13 #undef TCL_STORAGE_CLASS
955886f… mistachkin 14 #ifdef BUILD_tcl
955886f… mistachkin 15 # define TCL_STORAGE_CLASS DLLEXPORT
955886f… mistachkin 16 #else
955886f… mistachkin 17 # ifdef USE_TCL_STUBS
955886f… mistachkin 18 # define TCL_STORAGE_CLASS
955886f… mistachkin 19 # else
955886f… mistachkin 20 # define TCL_STORAGE_CLASS DLLIMPORT
955886f… mistachkin 21 # endif
955886f… mistachkin 22 #endif
955886f… mistachkin 23
955886f… mistachkin 24 /*
955886f… mistachkin 25 * WARNING: This file is automatically generated by the tools/genStubs.tcl
955886f… mistachkin 26 * script. Any modifications to the function declarations below should be made
955886f… mistachkin 27 * in the generic/tcl.decls script.
955886f… mistachkin 28 */
955886f… mistachkin 29
955886f… mistachkin 30 /*
955886f… mistachkin 31 * TCHAR is needed here for win32, so if it is not defined yet do it here.
955886f… mistachkin 32 * This way, we don't need to include <tchar.h> just for one define.
955886f… mistachkin 33 */
955886f… mistachkin 34 #if (defined(_WIN32) || defined(__CYGWIN__)) && !defined(_TCHAR_DEFINED)
955886f… mistachkin 35 # if defined(_UNICODE)
955886f… mistachkin 36 typedef wchar_t TCHAR;
955886f… mistachkin 37 # else
955886f… mistachkin 38 typedef char TCHAR;
955886f… mistachkin 39 # endif
955886f… mistachkin 40 # define _TCHAR_DEFINED
955886f… mistachkin 41 #endif
955886f… mistachkin 42
955886f… mistachkin 43 /* !BEGIN!: Do not edit below this line. */
955886f… mistachkin 44
955886f… mistachkin 45 /*
955886f… mistachkin 46 * Exported function declarations:
955886f… mistachkin 47 */
955886f… mistachkin 48
955886f… mistachkin 49 #if defined(__WIN32__) || defined(__CYGWIN__) /* WIN */
955886f… mistachkin 50 /* 0 */
955886f… mistachkin 51 EXTERN TCHAR * Tcl_WinUtfToTChar(const char *str, int len,
955886f… mistachkin 52 Tcl_DString *dsPtr);
955886f… mistachkin 53 /* 1 */
955886f… mistachkin 54 EXTERN char * Tcl_WinTCharToUtf(const TCHAR *str, int len,
955886f… mistachkin 55 Tcl_DString *dsPtr);
955886f… mistachkin 56 #endif /* WIN */
955886f… mistachkin 57 #ifdef MAC_OSX_TCL /* MACOSX */
955886f… mistachkin 58 /* 0 */
955886f… mistachkin 59 EXTERN int Tcl_MacOSXOpenBundleResources(Tcl_Interp *interp,
955886f… mistachkin 60 const char *bundleName, int hasResourceFile,
955886f… mistachkin 61 int maxPathLen, char *libraryPath);
955886f… mistachkin 62 /* 1 */
955886f… mistachkin 63 EXTERN int Tcl_MacOSXOpenVersionedBundleResources(
955886f… mistachkin 64 Tcl_Interp *interp, const char *bundleName,
955886f… mistachkin 65 const char *bundleVersion,
955886f… mistachkin 66 int hasResourceFile, int maxPathLen,
955886f… mistachkin 67 char *libraryPath);
955886f… mistachkin 68 #endif /* MACOSX */
955886f… mistachkin 69
955886f… mistachkin 70 typedef struct TclPlatStubs {
955886f… mistachkin 71 int magic;
955886f… mistachkin 72 void *hooks;
955886f… mistachkin 73
955886f… mistachkin 74 #if defined(__WIN32__) || defined(__CYGWIN__) /* WIN */
955886f… mistachkin 75 TCHAR * (*tcl_WinUtfToTChar) (const char *str, int len, Tcl_DString *dsPtr); /* 0 */
955886f… mistachkin 76 char * (*tcl_WinTCharToUtf) (const TCHAR *str, int len, Tcl_DString *dsPtr); /* 1 */
955886f… mistachkin 77 #endif /* WIN */
955886f… mistachkin 78 #ifdef MAC_OSX_TCL /* MACOSX */
955886f… mistachkin 79 int (*tcl_MacOSXOpenBundleResources) (Tcl_Interp *interp, const char *bundleName, int hasResourceFile, int maxPathLen, char *libraryPath); /* 0 */
955886f… mistachkin 80 int (*tcl_MacOSXOpenVersionedBundleResources) (Tcl_Interp *interp, const char *bundleName, const char *bundleVersion, int hasResourceFile, int maxPathLen, char *libraryPath); /* 1 */
955886f… mistachkin 81 #endif /* MACOSX */
955886f… mistachkin 82 } TclPlatStubs;
955886f… mistachkin 83
955886f… mistachkin 84 #ifdef __cplusplus
955886f… mistachkin 85 extern "C" {
955886f… mistachkin 86 #endif
955886f… mistachkin 87 extern const TclPlatStubs *tclPlatStubsPtr;
955886f… mistachkin 88 #ifdef __cplusplus
955886f… mistachkin 89 }
955886f… mistachkin 90 #endif
955886f… mistachkin 91
955886f… mistachkin 92 #if defined(USE_TCL_STUBS)
955886f… mistachkin 93
955886f… mistachkin 94 /*
955886f… mistachkin 95 * Inline function declarations:
955886f… mistachkin 96 */
955886f… mistachkin 97
955886f… mistachkin 98 #if defined(__WIN32__) || defined(__CYGWIN__) /* WIN */
955886f… mistachkin 99 #define Tcl_WinUtfToTChar \
955886f… mistachkin 100 (tclPlatStubsPtr->tcl_WinUtfToTChar) /* 0 */
955886f… mistachkin 101 #define Tcl_WinTCharToUtf \
955886f… mistachkin 102 (tclPlatStubsPtr->tcl_WinTCharToUtf) /* 1 */
955886f… mistachkin 103 #endif /* WIN */
955886f… mistachkin 104 #ifdef MAC_OSX_TCL /* MACOSX */
955886f… mistachkin 105 #define Tcl_MacOSXOpenBundleResources \
955886f… mistachkin 106 (tclPlatStubsPtr->tcl_MacOSXOpenBundleResources) /* 0 */
955886f… mistachkin 107 #define Tcl_MacOSXOpenVersionedBundleResources \
955886f… mistachkin 108 (tclPlatStubsPtr->tcl_MacOSXOpenVersionedBundleResources) /* 1 */
955886f… mistachkin 109 #endif /* MACOSX */
955886f… mistachkin 110
955886f… mistachkin 111 #endif /* defined(USE_TCL_STUBS) */
955886f… mistachkin 112
955886f… mistachkin 113 /* !END!: Do not edit above this line. */
955886f… mistachkin 114
955886f… mistachkin 115 #undef TCL_STORAGE_CLASS
955886f… mistachkin 116 #define TCL_STORAGE_CLASS DLLIMPORT
955886f… mistachkin 117
955886f… mistachkin 118 #endif /* _TCLPLATDECLS */
955886f… mistachkin 119
955886f… mistachkin 120

Keyboard Shortcuts

Open search /
Next entry (timeline) j
Previous entry (timeline) k
Open focused entry Enter
Show this help ?
Toggle theme Top nav button