2 files changed, 6 insertions, 1 deletions
diff --git a/perlio.c b/perlio.c
index 242aa711a3..ac5ace88db 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 ccace2eaaa..e9b9b54567 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