SF patch #474590 -- RISC OS support

This commit is contained in:
Guido van Rossum 2001-10-24 20:13:15 +00:00
parent 622cc03f0b
commit e877f8ba33
12 changed files with 142 additions and 74 deletions

View file

@ -5,7 +5,7 @@ static char *prefix,*exec_prefix,*progpath,*module_search_path=0;
static void
calculate_path()
{ char *pypath=Py_GETENV("Python$Path");
{ char *pypath=getenv("Python$Path");
if(pypath)
{ module_search_path=malloc(strlen(pypath)+1);
if (module_search_path) sprintf(module_search_path,"%s",pypath);
@ -16,9 +16,9 @@ calculate_path()
}
}
if(!module_search_path) module_search_path = "<Python$Dir>.Lib";
prefix="";
prefix="<Python$Dir>";
exec_prefix=prefix;
progpath="<Python$Dir>";
progpath=Py_GetProgramName();
}
/* External interface */