/[cvs]/eggdrop1.9/src/tcl.h
ViewVC logotype

Contents of /eggdrop1.9/src/tcl.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.3 - (show annotations) (download) (as text)
Thu Jan 2 21:33:16 2003 UTC (16 years, 10 months ago) by wcc
Branch: MAIN
Changes since 1.2: +2 -2 lines
File MIME type: text/x-csrc
* Updated copyright info for 2003.

1 /*
2 * tcl.h --
3 */
4 /*
5 * Copyright (C) 2000, 2001, 2002, 2003 Eggheads Development Team
6 *
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License
9 * as published by the Free Software Foundation; either version 2
10 * of the License, or (at your option) any later version.
11 *
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
20 */
21 /*
22 * $Id: tcl.h,v 1.2 2002/05/05 16:40:38 tothwolf Exp $
23 */
24
25 #ifndef _EGG_TCL_H
26 #define _EGG_TCL_H
27
28 /* For pre Tcl7.5p1 versions */
29 #ifndef HAVE_TCL_FREE
30 # define Tcl_Free(x) free(x)
31 #endif
32
33 /* For pre7.6 Tcl versions */
34 #ifndef TCL_PATCH_LEVEL
35 # define TCL_PATCH_LEVEL Tcl_GetVar(interp, "tcl_patchLevel", TCL_GLOBAL_ONLY)
36 #endif
37
38 void do_tcl(char *, char *);
39 int readtclprog(char *fname);
40 int findanyidx(int);
41
42 #endif /* !_EGG_TCL_H */

webmaster@eggheads.org
ViewVC Help
Powered by ViewVC 1.1.23