Fix my_chsize() for systems having chsize(), broken by change #24271

p4raw-link: @24271 on //depot/perl: 27da23d53ccce622bc51822f59df8def79b4df95

p4raw-id: //depot/perl@24276

diff --git a/pp_sys.c b/pp_sys.c
index d908a1c..135ae01 100644 (file)
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -118,6 +118,7 @@ extern int h_errno;
 # ifdef my_chsize  /* Probably #defined to Perl_my_chsize in embed.h */
 #   undef my_chsize
 # endif
+# define my_chsize PerlLIO_chsize
 #else
 # ifdef HAS_TRUNCATE
 #   define my_chsize PerlLIO_chsize