/[ascend]/trunk/tcltk98/generic/interface/SolverGlobals.h
ViewVC logotype

Annotation of /trunk/tcltk98/generic/interface/SolverGlobals.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 10 - (hide annotations) (download) (as text)
Sat Nov 13 16:40:11 2004 UTC (17 years, 7 months ago) by aw0a
Original Path: trunk/tcltk98/interface/SolverGlobals.h
File MIME type: text/x-chdr
File size: 1678 byte(s)
try again to commit moving tcl stuff
1 aw0a 1 /*
2     * SolverGlobals.h
3     * by Ben Allan
4     * Created: 7/97
5     * Version: $Revision: 1.2 $
6     * Version control file: $RCSfile: SolverGlobals.h,v $
7     * Date last modified: $Date: 1997/07/18 12:23:49 $
8     * Last modified by: $Author: mthomas $
9     *
10     * This file is part of the ASCEND Tcl/Tk interface
11     *
12     * Copyright 1997, Carnegie Mellon University
13     *
14     * The ASCEND Tcl/Tk interface is free software; you can redistribute
15     * it and/or modify it under the terms of the GNU General Public License as
16     * published by the Free Software Foundation; either version 2 of the
17     * License, or (at your option) any later version.
18     *
19     * The ASCEND Tcl/Tk interface is distributed in hope that it will be
20     * useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
21     * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
22     * General Public License for more details.
23     *
24     * You should have received a copy of the GNU General Public License
25     * along with the program; if not, write to the Free Software Foundation,
26     * Inc., 675 Mass Ave, Cambridge, MA 02139 USA. Check the file named
27     * COPYING. COPYING is found in ../compiler.
28     */
29    
30     #ifndef SolverGlobals_module_loaded
31     #define SolverGlobals_module_loaded
32    
33     /*
34     * The following global variables are used to maintain
35     * a single global solver system.
36     * This is bad.
37     * The storage of these variables is in SolverProc.c.
38     */
39     extern int g_solvinst_ndx, g_solvinst_limit;
40     extern slv_system_t g_browsys_cur, g_solvsys_cur;
41     extern struct Instance *g_solvinst_root; /* solver root instance */
42     extern struct Instance *g_solvinst_cur; /* solver current instance */
43    
44     #endif /* SolverGlobals_module_loaded */

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22