Integrate perlio:
Jarkko Hietaniemi [Wed, 8 May 2002 22:11:21 +0000 (22:11 +0000)]
[ 16496]
Portability and doc tweaks to PerlIO/XS stuff.
We are still "papering over the cracks" a bit,
but now it is good stiff card held on with epoxy.

[ 16495]
PerlIO/XS interface routine and doc updates from
lupe@lupe-christoph.de (Lupe Christoph) in mail
Subject: [For Review] Patch for perlio.c and pods
Message-Id: <20020505084315.GA23900@lupe-christoph.de>
Date: Sun, 5 May 2002 10:43:15 +0200
(Minor tweaks to follow.)
p4raw-link: @16496 on //depot/perlio: 22569500a4329ba00826e9a263a1e15c2b24247f
p4raw-link: @16495 on //depot/perlio: 8dcb57838133afcca1063f491fdd55188f1d84ed

p4raw-id: //depot/perl@16497

embed.fnc
perl.h
t/op/utf8decode.t [changed mode: 0755->0644]

index 4a3cab4..48c8090 100644 (file)
--- a/embed.fnc
+++ b/embed.fnc
@@ -1033,7 +1033,7 @@ s |void   |apply_attrs    |HV *stash|SV *target|OP *attrs|bool for_my
 s      |void   |apply_attrs_my |HV *stash|OP *target|OP *attrs|OP **imopsp
 #  if defined(PL_OP_SLAB_ALLOC)
 s      |void*  |Slab_Alloc     |int m|size_t sz
-s      |void   |Slab_Free      |void *op
+s      |void   |Slab_Free      |void *op
 #  endif
 #endif
 
diff --git a/perl.h b/perl.h
index 6e508c0..45adfbb 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -449,7 +449,7 @@ int usleep(unsigned int);
 #  define MYSWAP
 #endif
 
-/* Cannot include embed.h here on Win32 as win32.h has not
+/* Cannot include embed.h here on Win32 as win32.h has not 
    yet been included and defines some config variables e.g. HAVE_INTERP_INTERN
  */
 #if !defined(PERL_FOR_X2P) && !(defined(WIN32)||defined(VMS))
old mode 100755 (executable)
new mode 100644 (file)