From: Nick Ing-Simmons Date: Thu, 14 Jun 2001 20:00:12 +0000 (+0000) Subject: Steps along the road toward Win32 building again. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e06a3afbe255226c27f480b83177014c2fe65464;p=p5sagit%2Fp5-mst-13.2.git Steps along the road toward Win32 building again. p4raw-id: //depot/perlio@10591 --- diff --git a/perlio.c b/perlio.c index 242aa71..ac5ace8 100644 --- a/perlio.c +++ b/perlio.c @@ -393,8 +393,10 @@ PerlIO_list_push(PerlIO_list_t *list,PerlIO_funcs *funcs,SV *arg) } p = &(list->array[list->cur++]); p->funcs = funcs; - if ((p->arg = arg)) + if ((p->arg = arg)) { + dTHX; SvREFCNT_inc(arg); + } } @@ -4015,3 +4017,4 @@ PerlIO_sprintf(char *s, int n, const char *fmt,...) + diff --git a/win32/makefile.mk b/win32/makefile.mk index ccace2e..e9b9b54 100644 --- a/win32/makefile.mk +++ b/win32/makefile.mk @@ -671,6 +671,8 @@ MICROCORE_SRC = \ ..\universal.c \ ..\utf8.c \ ..\util.c \ + ..\numeric.c \ + ..\locale.c \ ..\xsutils.c EXTRACORE_SRC += perllib.c