/[ascend]/trunk/pygtk/library.cpp
ViewVC logotype

Diff of /trunk/pygtk/library.cpp

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

revision 1519 by johnpye, Mon Mar 5 07:22:21 2007 UTC revision 1520 by jpye, Sat Jun 30 01:23:36 2007 UTC
# Line 57  Library::Library(const char *defaultpath Line 57  Library::Library(const char *defaultpath
57    
58          Asc_CompilerInit(1);          Asc_CompilerInit(1);
59          env_import(PATHENVIRONMENTVAR,getenv,Asc_PutEnv);          env_import(PATHENVIRONMENTVAR,getenv,Asc_PutEnv);
60            env_import(ASC_ASCENDSOLVERSVAR,getenv,Asc_PutEnv);
61    
62          char *x = Asc_GetEnv(PATHENVIRONMENTVAR);          char *x = Asc_GetEnv(PATHENVIRONMENTVAR);
63          if(x==NULL || strcmp(x,"")==0){          if(x==NULL || strcmp(x,"")==0){
64              if(defaultpath==NULL){              if(defaultpath==NULL){
# Line 65  Library::Library(const char *defaultpath Line 67  Library::Library(const char *defaultpath
67                  );                  );
68                  defaultpath = DEFAULT_ASCENDLIBRARY;                  defaultpath = DEFAULT_ASCENDLIBRARY;
69              }              }
70                
71              string s = string(PATHENVIRONMENTVAR "=") + defaultpath;              string s = string(PATHENVIRONMENTVAR "=") + defaultpath;
72              //ERROR_REPORTER_HERE(ASC_PROG_NOTE,"Setting %s",s.c_str());;              //ERROR_REPORTER_HERE(ASC_PROG_NOTE,"Setting %s",s.c_str());;
73              Asc_PutEnv(s.c_str());              Asc_PutEnv(s.c_str());

Legend:
Removed from v.1519  
changed lines
  Added in v.1520

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