Warning: That file was not part of the compilation database. It may have many parsing errors.

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

Warning: That file was not part of the compilation database. It may have many parsing errors.