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

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

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

revision 1411 by johnpye, Mon Mar 5 07:22:21 2007 UTC revision 1412 by jpye, Mon Apr 23 13:55:28 2007 UTC
# Line 317  int AscDriver(int argc, CONST char **arg Line 317  int AscDriver(int argc, CONST char **arg
317    
318    color_on(stderr,"34;1");    color_on(stderr,"34;1");
319    ASC_FPRINTF(stderr,"\nASCEND modelling environment\n");    ASC_FPRINTF(stderr,"\nASCEND modelling environment\n");
320    ASC_FPRINTF(stderr,"Copyright(C) 1997, 2006 Carnegie Mellon University\n");    ASC_FPRINTF(stderr,"Copyright(C) 1997, 2006-2007 Carnegie Mellon University\n");
321    ASC_FPRINTF(stderr,"Copyright(C) 1993-1996 Kirk Andre Abbott, Ben Allan\n");    ASC_FPRINTF(stderr,"Copyright(C) 1993-1996 Kirk Andre Abbott, Ben Allan\n");
322    ASC_FPRINTF(stderr,"Copyright(C) 1990, 1993, 1994 Thomas Guthrie Epperly\n");    ASC_FPRINTF(stderr,"Copyright(C) 1990, 1993, 1994 Thomas Guthrie Epperly\n");
323    ASC_FPRINTF(stderr,"Built %s %s %s\n\n",__DATE__,__TIME__,build_name);    ASC_FPRINTF(stderr,"Built %s %s %s\n\n",__DATE__,__TIME__,build_name);
# Line 571  static void AscCheckEnvironVars(Tcl_Inte Line 571  static void AscCheckEnvironVars(Tcl_Inte
571          CONSOLE_DEBUG("DIST = %s",s1);          CONSOLE_DEBUG("DIST = %s",s1);
572    
573  # else  # else
574            CONSOLE_DEBUG("ASC_ABSOLUTE_PATHS=%d",ASC_ABSOLUTE_PATHS);
575          distfp = ospath_new(ASC_DATADIR);          distfp = ospath_new(ASC_DATADIR);
576          (void)progname;          (void)progname;
577  # endif  # endif
# Line 620  static void AscCheckEnvironVars(Tcl_Inte Line 621  static void AscCheckEnvironVars(Tcl_Inte
621          librarydir = ospath_str(libraryfp);          librarydir = ospath_str(libraryfp);
622      }      }
623    
   
624      CONSOLE_DEBUG("CHECKING FOR AscendRC FILE");      CONSOLE_DEBUG("CHECKING FOR AscendRC FILE");
625    
626      fp1 = ospath_new("AscendRC");      fp1 = ospath_new("AscendRC");

Legend:
Removed from v.1411  
changed lines
  Added in v.1412

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