[BACK]Return to manager.funct.c CVS log [TXT] [DIR] Up to [LON-CAPA] / capa / capa51 / GUITools

Diff for /capa/capa51/GUITools/manager.funct.c between versions 1.2 and 1.6

version 1.2, 1999/11/02 19:10:44 version 1.6, 2000/08/07 20:47:29
Line 1 Line 1
   /* C interfaces to CAPA for manager
      Copyright (C) 1992-2000 Michigan State University
   
      The CAPA system is free software; you can redistribute it and/or
      modify it under the terms of the GNU General Public License as
      published by the Free Software Foundation; either version 2 of the
      License, or (at your option) any later version.
   
      The CAPA system is distributed in the hope that it will be useful,
      but WITHOUT ANY WARRANTY; without even the implied warranty of
      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
      General Public License for more details.
   
      You should have received a copy of the GNU General Public
      License along with the CAPA system; see the file COPYING.  If not,
      write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
      Boston, MA 02111-1307, USA.
   
      As a special exception, you have permission to link this program
      with the TtH/TtM library and distribute executables, as long as you
      follow the requirements of the GNU GPL in regard to all of the
      software in the executable aside from TtH/TtM.
   */
   
 /*  /*
  * grader.funct.c   * manager.funct.c
  * Copyright Guy Albertelli II 1996-1999   * Guy Albertelli II 1996-1999
  * Portions Copyright Issac Tsai  
  */   */
 #include <stdio.h>  #include <stdio.h>
 #include <tk.h>  #include <tk.h>
 #include <Capa/capaCommon.h>  #include <pProj/capaCommon.h>
 #include <manager.h>  #include <manager.h>
   
 int capaCTcreateSummary (ClientData clientdata, Tcl_Interp *interp, int argc, char *argv[])  int capaCTcreateSummary (ClientData clientdata, Tcl_Interp *interp, int argc, char *argv[])
Line 32  int capaCTcreateSummary (ClientData clie Line 55  int capaCTcreateSummary (ClientData clie
   sortOne=Tcl_GetVar2(interp,"gCT",buf,TCL_GLOBAL_ONLY);    sortOne=Tcl_GetVar2(interp,"gCT",buf,TCL_GLOBAL_ONLY);
       sprintf(buf,"summary.second.%s",argv[2]);        sprintf(buf,"summary.second.%s",argv[2]);
   sortTwo=Tcl_GetVar2(interp,"gCT",buf,TCL_GLOBAL_ONLY);    sortTwo=Tcl_GetVar2(interp,"gCT",buf,TCL_GLOBAL_ONLY);
   maxSet=howManySetDBFile(argv[3]);    maxSet=howManySetDBFile();
   if (((strcmp(which,"upto") == 0) && ((set <= 0) || (set >= NUM_SET_LIMIT))) || (set > maxSet)) {    if (((strcmp(which,"upto") == 0) && ((set <= 0) || (set >= NUM_SET_LIMIT))) || (set > maxSet)) {
     sprintf(buf,"displayError \"The set number (%d) doesn't exist.\"",set);      sprintf(buf,"displayError \"The set number (%d) doesn't exist.\"",set);
     Tcl_Eval(interp,buf);      Tcl_Eval(interp,buf);
Removed from v.1.2  
changed lines
  Added in v.1.6

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>