Mercurial > repos > rliterman > csp2

comparison CSP2/CSP2_env/env-d9b9114564458d9d-741b3de822f2aaca6c6caa4325c4afce/include/tdbcInt.h @ 69:33d812a61356

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload commit 2e9511a184a1ca667c7be0c6321a36dc4e3d116d
author jpayne
date Tue, 18 Mar 2025 17:55:14 -0400
parents
children
comparison
equal deleted inserted replaced
67:0e9998148a16 69:33d812a61356
1 /*
2 * tdbcInt.h --
3 *
4 * Declarations of the public API for Tcl DataBase Connectivity (TDBC)
5 *
6 * Copyright (c) 2006 by Kevin B. Kenny
7 *
8 * See the file "license.terms" for information on usage and redistribution of
9 * this file, and for a DISCLAIMER OF ALL WARRANTIES.
10 *
11 * RCS: @(#) $Id$
12 *
13 *-----------------------------------------------------------------------------
14 */
15 #ifndef TDBCINT_H_INCLUDED
16 #define TDBCINT_H_INCLUDED 1
17
18 #include "tdbc.h"
19
20 /*
21 * Used to tag functions that are only to be visible within the module being
22 * built and not outside it (where this is supported by the linker).
23 */
24
25 #ifndef MODULE_SCOPE
26 # ifdef __cplusplus
27 # define MODULE_SCOPE extern "C"
28 # else
29 # define MODULE_SCOPE extern
30 # endif
31 #endif
32
33 #ifndef JOIN
34 # define JOIN(a,b) JOIN1(a,b)
35 # define JOIN1(a,b) a##b
36 #endif
37
38 #ifndef TCL_UNUSED
39 # if defined(__cplusplus)
40 # define TCL_UNUSED(T) T
41 # elif defined(__GNUC__) && (__GNUC__ > 2)
42 # define TCL_UNUSED(T) T JOIN(dummy, __LINE__) __attribute__((unused))
43 # else
44 # define TCL_UNUSED(T) T JOIN(dummy, __LINE__)
45 # endif
46 #endif
47
48 /*
49 * Linkage to procedures not exported from this module
50 */
51
52 MODULE_SCOPE int TdbcTokenizeObjCmd(void *clientData, Tcl_Interp* interp,
53 int objc, Tcl_Obj *const objv[]);
54
55 #endif