Mercurial > repos > rliterman > csp2
annotate CSP2/CSP2_env/env-d9b9114564458d9d-741b3de822f2aaca6c6caa4325c4afce/include/tdbcInt.h @ 69:33d812a61356
planemo upload commit 2e9511a184a1ca667c7be0c6321a36dc4e3d116d
| author | jpayne |
|---|---|
| date | Tue, 18 Mar 2025 17:55:14 -0400 |
| parents | |
| children |
| rev | line source |
|---|---|
| jpayne@69 | 1 /* |
| jpayne@69 | 2 * tdbcInt.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 #ifndef TDBCINT_H_INCLUDED |
| jpayne@69 | 16 #define TDBCINT_H_INCLUDED 1 |
| jpayne@69 | 17 |
| jpayne@69 | 18 #include "tdbc.h" |
| jpayne@69 | 19 |
| jpayne@69 | 20 /* |
| jpayne@69 | 21 * Used to tag functions that are only to be visible within the module being |
| jpayne@69 | 22 * built and not outside it (where this is supported by the linker). |
| jpayne@69 | 23 */ |
| jpayne@69 | 24 |
| jpayne@69 | 25 #ifndef MODULE_SCOPE |
| jpayne@69 | 26 # ifdef __cplusplus |
| jpayne@69 | 27 # define MODULE_SCOPE extern "C" |
| jpayne@69 | 28 # else |
| jpayne@69 | 29 # define MODULE_SCOPE extern |
| jpayne@69 | 30 # endif |
| jpayne@69 | 31 #endif |
| jpayne@69 | 32 |
| jpayne@69 | 33 #ifndef JOIN |
| jpayne@69 | 34 # define JOIN(a,b) JOIN1(a,b) |
| jpayne@69 | 35 # define JOIN1(a,b) a##b |
| jpayne@69 | 36 #endif |
| jpayne@69 | 37 |
| jpayne@69 | 38 #ifndef TCL_UNUSED |
| jpayne@69 | 39 # if defined(__cplusplus) |
| jpayne@69 | 40 # define TCL_UNUSED(T) T |
| jpayne@69 | 41 # elif defined(__GNUC__) && (__GNUC__ > 2) |
| jpayne@69 | 42 # define TCL_UNUSED(T) T JOIN(dummy, __LINE__) __attribute__((unused)) |
| jpayne@69 | 43 # else |
| jpayne@69 | 44 # define TCL_UNUSED(T) T JOIN(dummy, __LINE__) |
| jpayne@69 | 45 # endif |
| jpayne@69 | 46 #endif |
| jpayne@69 | 47 |
| jpayne@69 | 48 /* |
| jpayne@69 | 49 * Linkage to procedures not exported from this module |
| jpayne@69 | 50 */ |
| jpayne@69 | 51 |
| jpayne@69 | 52 MODULE_SCOPE int TdbcTokenizeObjCmd(void *clientData, Tcl_Interp* interp, |
| jpayne@69 | 53 int objc, Tcl_Obj *const objv[]); |
| jpayne@69 | 54 |
| jpayne@69 | 55 #endif |