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 d908a1ccfd53ef4989dd936196121dcd1302598a..135ae0161674f2d6027dfc2f3d35cd3db835a04d 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