|
jpayne@69
|
1 /*
|
|
jpayne@69
|
2 * tdbc.h --
|
|
jpayne@69
|
3 *
|
|
jpayne@69
|
4 * Declarations of the public API for Tcl DataBase Connectivity (TDBC)
|
|
jpayne@69
|
5 *
|
|
jpayne@69
|
6 * Copyright (c) 2006 by Kevin B. Kenny
|
|
jpayne@69
|
7 *
|
|
jpayne@69
|
8 * See the file "license.terms" for information on usage and redistribution of
|
|
jpayne@69
|
9 * this file, and for a DISCLAIMER OF ALL WARRANTIES.
|
|
jpayne@69
|
10 *
|
|
jpayne@69
|
11 * RCS: @(#) $Id$
|
|
jpayne@69
|
12 *
|
|
jpayne@69
|
13 *-----------------------------------------------------------------------------
|
|
jpayne@69
|
14 */
|
|
jpayne@69
|
15
|
|
jpayne@69
|
16 #ifndef TDBC_H_INCLUDED
|
|
jpayne@69
|
17 #define TDBC_H_INCLUDED 1
|
|
jpayne@69
|
18
|
|
jpayne@69
|
19 #include <tcl.h>
|
|
jpayne@69
|
20
|
|
jpayne@69
|
21 #ifndef TDBCAPI
|
|
jpayne@69
|
22 # if defined(BUILD_tdbc)
|
|
jpayne@69
|
23 # define TDBCAPI MODULE_SCOPE
|
|
jpayne@69
|
24 # else
|
|
jpayne@69
|
25 # define TDBCAPI extern
|
|
jpayne@69
|
26 # undef USE_TDBC_STUBS
|
|
jpayne@69
|
27 # define USE_TDBC_STUBS 1
|
|
jpayne@69
|
28 # endif
|
|
jpayne@69
|
29 #endif
|
|
jpayne@69
|
30
|
|
jpayne@69
|
31 #ifdef __cplusplus
|
|
jpayne@69
|
32 extern "C" {
|
|
jpayne@69
|
33 #endif
|
|
jpayne@69
|
34
|
|
jpayne@69
|
35 #if defined(BUILD_tdbc)
|
|
jpayne@69
|
36 DLLEXPORT int Tdbc_Init(Tcl_Interp *interp);
|
|
jpayne@69
|
37 #elif defined(STATIC_BUILD)
|
|
jpayne@69
|
38 extern int Tdbc_Init(Tcl_Interp* interp);
|
|
jpayne@69
|
39 #else
|
|
jpayne@69
|
40 DLLIMPORT int Tdbc_Init(Tcl_Interp* interp);
|
|
jpayne@69
|
41 #endif
|
|
jpayne@69
|
42
|
|
jpayne@69
|
43 #define Tdbc_InitStubs(interp) TdbcInitializeStubs(interp, \
|
|
jpayne@69
|
44 TDBC_VERSION, TDBC_STUBS_EPOCH, TDBC_STUBS_REVISION)
|
|
jpayne@69
|
45 #if defined(USE_TDBC_STUBS)
|
|
jpayne@69
|
46 TDBCAPI const char* TdbcInitializeStubs(
|
|
jpayne@69
|
47 Tcl_Interp* interp, const char* version, int epoch, int revision);
|
|
jpayne@69
|
48 #else
|
|
jpayne@69
|
49 # define TdbcInitializeStubs(interp, version, epoch, revision) \
|
|
jpayne@69
|
50 (Tcl_PkgRequire(interp, "tdbc", version))
|
|
jpayne@69
|
51 #endif
|
|
jpayne@69
|
52
|
|
jpayne@69
|
53 #ifdef __cplusplus
|
|
jpayne@69
|
54 }
|
|
jpayne@69
|
55 #endif
|
|
jpayne@69
|
56
|
|
jpayne@69
|
57 /*
|
|
jpayne@69
|
58 * TDBC_VERSION and TDBC_PATCHLEVEL here must match the ones that
|
|
jpayne@69
|
59 * appear near the top of configure.ac.
|
|
jpayne@69
|
60 */
|
|
jpayne@69
|
61
|
|
jpayne@69
|
62 #define TDBC_VERSION "1.1"
|
|
jpayne@69
|
63 #define TDBC_PATCHLEVEL "1.1.5"
|
|
jpayne@69
|
64
|
|
jpayne@69
|
65 /*
|
|
jpayne@69
|
66 * Include the Stubs declarations for the public API, generated from
|
|
jpayne@69
|
67 * tdbc.decls.
|
|
jpayne@69
|
68 */
|
|
jpayne@69
|
69
|
|
jpayne@69
|
70 #include "tdbcDecls.h"
|
|
jpayne@69
|
71
|
|
jpayne@69
|
72 #endif
|
|
jpayne@69
|
73
|
|
jpayne@69
|
74 /*
|
|
jpayne@69
|
75 * Local Variables:
|
|
jpayne@69
|
76 * mode: c
|
|
jpayne@69
|
77 * c-basic-offset: 4
|
|
jpayne@69
|
78 * fill-column: 78
|
|
jpayne@69
|
79 * End:
|
|
jpayne@69
|
80 */
|
