Scilab [trunk]: scilab/modules/core/src/c/setgetSCIpath.c Source File

00001 /*-----------------------------------------------------------------------------------*/
00002 /* INRIA 2006 */
00003 /* Allan CORNET */
00004 /*-----------------------------------------------------------------------------------*/ 
00005 #include <stdio.h>
00006 #include "setgetSCIpath.h"
00007 #include "MALLOC.h"
00008 #include "string.h"
00009 /*-----------------------------------------------------------------------------------*/ 
00010 #define PATH_MAX 1024
00011 /*-----------------------------------------------------------------------------------*/ 
00012 static char SCIPATH[PATH_MAX];
00013 /*-----------------------------------------------------------------------------------*/ 
00014 void setSCIpath(char *path)
00015 {
00016         sprintf(SCIPATH,"%s",path);
00017 }
00018 /*-----------------------------------------------------------------------------------*/ 
00019 char *getSCIpath(void)
00020 {
00021         char *pathtoreturn=NULL;
00022         pathtoreturn=(char*)MALLOC(sizeof(char)*(strlen(SCIPATH)+1));
00023         sprintf(pathtoreturn,"%s",SCIPATH);
00024         return pathtoreturn;
00025 }
00026 /*-----------------------------------------------------------------------------------*/