source/include/tdbcInt.h

0001 /*
0002  * tdbcInt.h --
0003  *
0004  *  Declarations of the public API for Tcl DataBase Connectivity (TDBC)
0005  *
0006  * Copyright (c) 2006 by Kevin B. Kenny
0007  *
0008  * See the file "license.terms" for information on usage and redistribution of
0009  * this file, and for a DISCLAIMER OF ALL WARRANTIES.
0010  *
0011  * RCS: @(#) $Id$
0012  *
0013  *-----------------------------------------------------------------------------
0014  */
0015 #ifndef TDBCINT_H_INCLUDED
0016 #define TDBCINT_H_INCLUDED 1
0017
0018 #include "tdbc.h"
0019
0020 /*
0021  * Used to tag functions that are only to be visible within the module being
0022  * built and not outside it (where this is supported by the linker).
0023  */
0024
0025 #ifndef MODULE_SCOPE
0026 #   ifdef __cplusplus
0027 #   define MODULE_SCOPE extern "C"
0028 #   else
0029 #   define MODULE_SCOPE extern
0030 #   endif
0031 #endif
0032
0033 #ifndef JOIN
0034 #  define JOIN(a,b) JOIN1(a,b)
0035 #  define JOIN1(a,b) a##b
0036 #endif
0037
0038 #ifndef TCL_UNUSED
0039 #   if defined(__cplusplus)
0040 #   define TCL_UNUSED(T) T
0041 #   elif defined(__GNUC__) && (__GNUC__ > 2)
0042 #   define TCL_UNUSED(T) T JOIN(dummy, __LINE__) __attribute__((unused))
0043 #   else
0044 #   define TCL_UNUSED(T) T JOIN(dummy, __LINE__)
0045 #   endif
0046 #endif
0047
0048 /*
0049  * Linkage to procedures not exported from this module
0050  */
0051
0052 MODULE_SCOPE int TdbcTokenizeObjCmd(void *clientData, Tcl_Interp* interp,
0053                     int objc, Tcl_Obj *const objv[]);
0054
0055 #endif