/[ascend]/trunk/tcltk/generic/interface/Driver.h
ViewVC logotype

Diff of /trunk/tcltk/generic/interface/Driver.h

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 574 by johnpye, Tue May 9 00:14:59 2006 UTC revision 575 by johnpye, Tue May 9 01:07:41 2006 UTC
# Line 1  Line 1 
1  /*  /*  ASCEND modelling environment
2   *  Driver.h      Copyright 1997, Carnegie Mellon University
3   *  by Kirk Abbott and Ben Allan      Copyright (C) 2006 Carnegie Mellon University
4   *  Created: 1/94  
5   *  Version: $Revision: 1.3 $      This program is free software; you can redistribute it and/or modify
6   *  Version control file: $RCSfile: Driver.h,v $      it under the terms of the GNU General Public License as published by
7   *  Date last modified: $Date: 2003/08/23 18:43:06 $      the Free Software Foundation; either version 2, or (at your option)
8   *  Last modified by: $Author: ballan $      any later version.
9   *  
10   *  This file is part of the ASCEND Tcl/Tk interface      This program is distributed in the hope that it will be useful,
11   *      but WITHOUT ANY WARRANTY; without even the implied warranty of
12   *  Copyright 1997, Carnegie Mellon University      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13   *      GNU General Public License for more details.
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      You should have received a copy of the GNU General Public License
16   *  published by the Free Software Foundation; either version 2 of the      along with this program; if not, write to the Free Software
17   *  License, or (at your option) any later version.      Foundation, Inc., 59 Temple Place - Suite 330,
18   *      Boston, MA 02111-1307, USA.
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      @file
21   *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU      Main Tcl/Tk Driver.
22   *  General Public License for more details.  *//*
23   *      Driver.h
24   *  You should have received a copy of the GNU General Public License      by Kirk Abbott and Ben Allan
25   *  along with the program; if not, write to the Free Software Foundation,      Created: 1/94
26   *  Inc., 675 Mass Ave, Cambridge, MA 02139 USA.  Check the file named      Version: $Revision: 1.3 $
27   *  COPYING.  COPYING is found in ../compiler.      Version control file: $RCSfile: Driver.h,v $
28   */      Date last modified: $Date: 2003/08/23 18:43:06 $
29        Last modified by: $Author: ballan $
30  /** @file  */
  *  Main Tcl/Tk Driver.  
  *  <pre>  
  *  To include this header, you must include the following:  
  *      #include "tcl.h"  
  *      #include "utilities/ascConfig.h"  
  *  </pre>  
  */  
31    
32  #ifndef ASCTK_DRIVER_H  #ifndef ASCTK_DRIVER_H
33  #define ASCTK_DRIVER_H  #define ASCTK_DRIVER_H
34    
35  extern int g_compiler_timing;  extern int g_compiler_timing;
36  /**<  /**<
  *  <!--  g_compiler_timing                                            -->  
  *  
37   *  TRUE if compiler timing is to be printed.   *  TRUE if compiler timing is to be printed.
38   *  default is false, set to TRUE by passing -t on the command line   *  default is false, set to TRUE by passing -t on the command line
39   */   */
40    
41  extern Tcl_Interp *g_interp;  extern Tcl_Interp *g_interp;
42  /**<  /**<
  *  <!--  g_interp                                                     -->  
  *  
43   *  Interpreter for this application.  We need tp make it global   *  Interpreter for this application.  We need tp make it global
44   *  so that our signal/floating-porint traps can access it.   *  so that our signal/floating-porint traps can access it.
45   */   */
# Line 62  ASC_DLLSPEC(int) AscDriver(int argc, CON Line 51  ASC_DLLSPEC(int) AscDriver(int argc, CON
51    
52  extern int Asc_LoadWin(ClientData, Tcl_Interp *, int, CONST84 char**);  extern int Asc_LoadWin(ClientData, Tcl_Interp *, int, CONST84 char**);
53  /**<  /**<
  *  <!--  int Asc_LoadWin(cdata, interp, argc, argv)                   -->  
  *  <!--      ClientData cdata;                                        -->  
  *  <!--      Tcl_Interp *interp;                                      -->  
  *  <!--      int argc;                                                -->  
  *  <!--      char **argv;                                             -->  
  *  
54   *  Tcl callback to determine if Tcl/Tk should build Tk windows.   *  Tcl callback to determine if Tcl/Tk should build Tk windows.
55   *  Returns 1 if it should, 0 if we only want a command line.<br><br>   *  Returns 1 if it should, 0 if we only want a command line.<br><br>
56   *   *
# Line 79  extern int Asc_LoadWin(ClientData, Tcl_I Line 62  extern int Asc_LoadWin(ClientData, Tcl_I
62  #ifdef DEBUG_MALLOC  #ifdef DEBUG_MALLOC
63  extern int Asc_DebugMallocCmd(ClientData, Tcl_Interp*, int, CONST84 char**);  extern int Asc_DebugMallocCmd(ClientData, Tcl_Interp*, int, CONST84 char**);
64  /**<  /**<
  *  <!--  int Asc_DebugMallocCmd(cdata, interp, argc, argv)            -->  
  *  <!--      ClientData cdata;                                        -->  
  *  <!--      Tcl_Interp *interp;                                      -->  
  *  <!--      int argc;                                                -->  
  *  <!--      char **argv;                                             -->  
  *  
65   *  Tcl callback for Tom Epperly's debugging malloc.   *  Tcl callback for Tom Epperly's debugging malloc.
66   */   */
67  #endif  /* DEBUG_MALLOC */  #endif  /* DEBUG_MALLOC */

Legend:
Removed from v.574  
changed lines
  Added in v.575

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