diff options
| author | tobi <tobi@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-09-24 16:51:25 +0000 |
|---|---|---|
| committer | tobi <tobi@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-09-24 16:51:25 +0000 |
| commit | 8e0473f7bc00554905f0d2d5b83d9cd3aba993b6 (patch) | |
| tree | 818b590776dd3a2ca045d976acec868f5d4bfd09 /gcc/fortran/iresolve.c | |
| parent | 70f4e4da9c9e76cd3d351a17630cfd8445f88e4c (diff) | |
| download | ppe42-gcc-8e0473f7bc00554905f0d2d5b83d9cd3aba993b6.tar.gz ppe42-gcc-8e0473f7bc00554905f0d2d5b83d9cd3aba993b6.zip | |
* intrinsic.h (gfc_resolve_getcwd): Update prototype.
* iresolve.c (gfc_resolve_getcwd): Add second argument to function.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@88055 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/iresolve.c')
| -rw-r--r-- | gcc/fortran/iresolve.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/iresolve.c b/gcc/fortran/iresolve.c index ed8bc569bcf..201b3f962e2 100644 --- a/gcc/fortran/iresolve.c +++ b/gcc/fortran/iresolve.c @@ -572,7 +572,7 @@ gfc_resolve_g77_math1 (gfc_expr * f, gfc_expr * x) void -gfc_resolve_getcwd (gfc_expr * f) +gfc_resolve_getcwd (gfc_expr * f, gfc_expr * n ATTRIBUTE_UNUSED) { f->ts.type = BT_INTEGER; f->ts.kind = 4; |
