1 |
//$Header$ |
2 |
//------------------------------------------------------------------------------------------------- |
3 |
//This file is part of "David T. Ashley's Shared Source Code", a set of shared components |
4 |
//integrated into many of David T. Ashley's projects. |
5 |
//------------------------------------------------------------------------------------------------- |
6 |
//This source code and any program in which it is compiled/used is provided under the MIT License, |
7 |
//reproduced below. |
8 |
//------------------------------------------------------------------------------------------------- |
9 |
//Permission is hereby granted, free of charge, to any person obtaining a copy of |
10 |
//this software and associated documentation files(the "Software"), to deal in the |
11 |
//Software without restriction, including without limitation the rights to use, |
12 |
//copy, modify, merge, publish, distribute, sublicense, and / or sell copies of the |
13 |
//Software, and to permit persons to whom the Software is furnished to do so, |
14 |
//subject to the following conditions : |
15 |
// |
16 |
//The above copyright notice and this permission notice shall be included in all |
17 |
//copies or substantial portions of the Software. |
18 |
// |
19 |
//THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
20 |
//IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
21 |
//FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.IN NO EVENT SHALL THE |
22 |
//AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
23 |
//LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
24 |
//OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE |
25 |
//SOFTWARE. |
26 |
//------------------------------------------------------------------------------------------------- |
27 |
//This module provides the extension "arbints" to the Tcl script |
28 |
//interpreter. The extensions provided are: |
29 |
// 1)arbints |
30 |
// 1.01)arbints iseflag |
31 |
// |
32 |
|
33 |
#ifndef ARBLENINTS_H_INCLUDED |
34 |
#define ARBLENINTS_H_INCLUDED |
35 |
|
36 |
#ifdef MODULE_ARBLENINTS |
37 |
#define DECMOD_ARBLENINTS |
38 |
#else |
39 |
#define DECMOD_ARBLENINTS extern |
40 |
#endif |
41 |
|
42 |
//Implements the "arbint" extension. |
43 |
DECMOD_ARBLENINTS int ARBLENINTS_arbint_extn_command( |
44 |
ClientData dummy, |
45 |
Tcl_Interp *interp, |
46 |
int objc, |
47 |
Tcl_Obj *objv[]); |
48 |
|
49 |
//Registers all extensions present in this software module |
50 |
//with the Tcl interpreter. |
51 |
DECMOD_ARBLENINTS void ARBLENINTS_arbint_extn_init(Tcl_Interp *interp); |
52 |
|
53 |
//Version control reporting functions. |
54 |
DECMOD_ARBLENINTS const char *ARBLENINTS_cvcinfo(void); |
55 |
DECMOD_ARBLENINTS const char *ARBLENINTS_hvcinfo(void); |
56 |
|
57 |
#define ARBLENINTS_H_VERSION ("$Header$") |
58 |
#endif |
59 |
|
60 |
//End of arblenints.h. |