1 files changed, 1 insertions, 0 deletions
diff --git a/perlio.c b/perlio.c
index 4d2b6a93f0..46afce7692 100644
--- a/perlio.c
+++ b/perlio.c
@@ -4744,6 +4744,7 @@ PerlIO_getname(PerlIO *f, char *buf)
     (void)f;
     (void)buf;
     Perl_croak(aTHX_ "Don't know how to get file name");
+    return Nullch;
 #endif
 }