Back to index

radiance  4R0+20100331
getlibpath.c
Go to the documentation of this file.
00001 #ifndef lint
00002 static const char    RCSid[] = "$Id: getlibpath.c,v 2.5 2003/07/17 09:21:29 schorsch Exp $";
00003 #endif
00004 /*
00005  * Return Radiance library search path
00006  *
00007  *  External symbols declared in standard.h
00008  */
00009 
00010 #include "copyright.h"
00011 
00012 #include <stdio.h>
00013 
00014 #include "rtio.h"
00015 #include "paths.h"
00016 
00017 char *
00018 getrlibpath()
00019 {
00020        static char   *libpath = NULL;
00021 
00022        if (libpath == NULL)
00023               if ((libpath = getenv(ULIBVAR)) == NULL)
00024                      libpath = DEFPATH;
00025 
00026        return(libpath);
00027 }