Parent Directory | Revision Log | Patch
revision 1.49 by mvo, Sat Apr 5 19:10:22 2003 UTC | revision 1.50 by kryde, Tue Aug 12 20:23:35 2003 UTC | |
---|---|---|
# | Line 22 | Line 22 |
22 | #endif | #endif |
23 | ||
24 | #include <errno.h> | #include <errno.h> |
25 | #include <stdlib.h> /* for getenv */ | |
26 | ||
27 | #include "libguile/_scm.h" | #include "libguile/_scm.h" |
28 | ||
# | Line 74 SCM_DEFINE (scm_system, "system", 0, 1, | Line 75 SCM_DEFINE (scm_system, "system", 0, 1, |
75 | #undef FUNC_NAME | #undef FUNC_NAME |
76 | #endif /* HAVE_SYSTEM */ | #endif /* HAVE_SYSTEM */ |
77 | ||
extern char *getenv(); | ||
78 | SCM_DEFINE (scm_getenv, "getenv", 1, 0, 0, | SCM_DEFINE (scm_getenv, "getenv", 1, 0, 0, |
79 | (SCM nam), | (SCM nam), |
80 | "Looks up the string @var{name} in the current environment. The return\n" | "Looks up the string @var{name} in the current environment. The return\n" |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |