diff options
Diffstat (limited to 'libgfortran/io/unix.c')
| -rw-r--r-- | libgfortran/io/unix.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/libgfortran/io/unix.c b/libgfortran/io/unix.c index a384f7b..e66560f 100644 --- a/libgfortran/io/unix.c +++ b/libgfortran/io/unix.c @@ -1000,6 +1000,8 @@ unit_to_fd (int unit) int unpack_filename (char *cstring, const char *fstring, int len) { + if (fstring == NULL) + return 1; len = fstrlen (fstring, len); if (len >= PATH_MAX) return 1; |