X-Git-Url: http://gitweb.scilab.org/?p=scilab.git;a=blobdiff_plain;f=scilab%2Fmodules%2Fcore%2Fsrc%2Fc%2Finisci-c.c;h=a3986b3a88e367078af1329d10353d8455c4e1cf;hp=bb96644e8a618ce6a36168e81990febc9e8cf155;hb=297216e5d05cae232b40e9ad32545321dc62abeb;hpb=77d9a869a2009524be70ca98efee61ba87f0b62e diff --git a/scilab/modules/core/src/c/inisci-c.c b/scilab/modules/core/src/c/inisci-c.c index bb96644..a3986b3 100644 --- a/scilab/modules/core/src/c/inisci-c.c +++ b/scilab/modules/core/src/c/inisci-c.c @@ -175,23 +175,14 @@ int C2F(gettmpdir)(char *buf,int *nbuf,long int lbuf) /*--------------------------------------------------------------------------*/ BOOL ExistModelicac(void) { - // @ TO DO remove this - // used in getversion (compatibility) - #define FORMAT_SCIBIN_PATH "%s/bin/%s" - BOOL bOK=FALSE; - char *SCIPATH = (char*)getSCIpath(); - char *fullpathModelicac=NULL; - int length_path = strlen(SCIPATH) + - strlen(ModelicacName) + - strlen(FORMAT_SCIBIN_PATH) + 1 ; - - fullpathModelicac=(char*)MALLOC((length_path)*sizeof(char)); - sprintf(fullpathModelicac,FORMAT_SCIBIN_PATH,SCIPATH,ModelicacName); - - bOK = FileExist(fullpathModelicac); - if (fullpathModelicac) FREE(fullpathModelicac); - if (SCIPATH) FREE(SCIPATH); - return bOK; + char *fullpathModelicac = searchEnv( ModelicacName,"PATH"); + if (fullpathModelicac) + { + FREE(fullpathModelicac); + fullpathModelicac = NULL; + return TRUE; + } + return FALSE; } /*--------------------------------------------------------------------------*/ int C2F(withgui)(int *rep)