/[gcl]/gcl/gcl-tk/tkAppInit.c
ViewVC logotype

Diff of /gcl/gcl-tk/tkAppInit.c

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

revision 1.1.1.1 by wfs, Mon Dec 6 22:44:00 1999 UTC revision 1.2 by camm, Sat Jul 20 07:10:55 2002 UTC
# Line 25  Line 25 
25   * PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.   * PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.
26   */   */
27    
28  #ifndef lint  /*  #ifndef lint */
29  static char rcsid[] = "/usr/home/gah/repository/blt/tkAppInit.c,v 1.3 1994/04/02 04:37:26 gah Exp SPRITE (Berkeley) $Revision";  /*  static char rcsid[] = "/usr/home/gah/repository/blt/tkAppInit.c,v 1.3 1994/04/02 04:37:26 gah Exp SPRITE (Berkeley) $Revision"; */
30  #endif /* not lint */  /*  #endif */
31    
32  #include "tk.h"  #include "tk.h"
33    
# Line 64  int Line 64  int
64  Tcl_AppInit(interp)  Tcl_AppInit(interp)
65      Tcl_Interp *interp;         /* Interpreter for application. */      Tcl_Interp *interp;         /* Interpreter for application. */
66  {  {
67      Tk_Window main;      Tk_Window mmain;
68  /*  /*
69      extern int Blt_Init _ANSI_ARGS_((Tcl_Interp *interp));      extern int Blt_Init _ANSI_ARGS_((Tcl_Interp *interp));
70  */  */
71      main = Tk_MainWindow(interp);      mmain = Tk_MainWindow(interp);
72    
73      /*      /*
74       * Call the init procedures for included packages.  Each call should       * Call the init procedures for included packages.  Each call should

Legend:
Removed from v.1.1.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26