diff options
Diffstat (limited to 'libgfortran/intrinsics/getcwd.c')
| -rw-r--r-- | libgfortran/intrinsics/getcwd.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/libgfortran/intrinsics/getcwd.c b/libgfortran/intrinsics/getcwd.c index e0826808ec2..60ec6feb1fe 100644 --- a/libgfortran/intrinsics/getcwd.c +++ b/libgfortran/intrinsics/getcwd.c @@ -37,6 +37,8 @@ Boston, MA 02110-1301, USA. */ #include <unistd.h> #endif +#ifdef HAVE_GETCWD + extern void getcwd_i4_sub (char *, GFC_INTEGER_4 *, gfc_charlen_type); iexport_proto(getcwd_i4_sub); @@ -82,3 +84,5 @@ PREFIX(getcwd) (char *cwd, gfc_charlen_type cwd_len) getcwd_i4_sub (cwd, &status, cwd_len); return status; } + +#endif |
