Nikola Knezevic [Sun, 14 Oct 2001 23:14:46 +0000]
AutoSplit.t now passes (partialy) on Win32
Message-ID: <
265984377.20011014231446@tesla.rcub.bg.ac.yu>
except for the 2->4 changes.
p4raw-id: //depot/perl@12598
Jarkko Hietaniemi [Mon, 22 Oct 2001 21:43:44 +0000]
At some point the #6234 has been lost from the mainline
(noticed by Pudge; what's a Mac guy doing reading Win modules? :-)
p4raw-id: //depot/perl@12596
Jarkko Hietaniemi [Mon, 22 Oct 2001 21:31:31 +0000]
Cygwin seems to round up (or closest, but not down)
for time(), so half of the time (bad pun intended)
Time::HiRes::time() is less than time(), half of
the time it's more. So let's try harder in the loop.
p4raw-id: //depot/perl@12595
Jarkko Hietaniemi [Mon, 22 Oct 2001 21:23:15 +0000]
MacOS Classic timeofday(), from Chris Nandor.
p4raw-id: //depot/perl@12594
Jarkko Hietaniemi [Mon, 22 Oct 2001 21:17:39 +0000]
Integrate changes #12580 and #12581 from macperl;
Fix path construction.
(Copyright) Nit.
p4raw-link: @12580 on //depot/maint-5.6/macperl:
b2884604d5d1f2307ba4e8645e11489721ebb1bf
p4raw-id: //depot/perl@12593
p4raw-integrated: from //depot/maint-5.6/macperl@12592 'ignore' perl.c
(@12324..) 'merge in' ext/DynaLoader/DynaLoader_pm.PL
(@11007..)
Jarkko Hietaniemi [Mon, 22 Oct 2001 21:00:18 +0000]
No domainname(1) in Cygwin, either, and the 2>/dev/null
doesn't seem to help (the error being output to console, maybe?)
p4raw-id: //depot/perl@12592
Jarkko Hietaniemi [Mon, 22 Oct 2001 20:55:08 +0000]
Taint the getcwd() result also in Cygwin.
(TODO: which other platforms need the same thing?)
p4raw-id: //depot/perl@12591
Jarkko Hietaniemi [Mon, 22 Oct 2001 20:27:47 +0000]
Pretty hard for eval { setpwent(); getpwent(); 1 } to return false.
p4raw-id: //depot/perl@12590
Jarkko Hietaniemi [Mon, 22 Oct 2001 20:10:40 +0000]
getpwuid() fragility continues.
p4raw-id: //depot/perl@12589
Jarkko Hietaniemi [Mon, 22 Oct 2001 19:58:34 +0000]
getpwuid() might succeed but that's no guarantee
that the $home will be defined.
p4raw-id: //depot/perl@12588
Jarkko Hietaniemi [Mon, 22 Oct 2001 19:50:35 +0000]
It's safer to to expand the variable, too... (see #12571)
p4raw-id: //depot/perl@12587
Craig A. Berry [Mon, 22 Oct 2001 15:25:19 +0000]
configure.com: no threads/shared without ithreads
Message-Id: <5.1.0.14.2.
20011022151232.032544e8@exchi01>
p4raw-id: //depot/perl@12584
Jarkko Hietaniemi [Mon, 22 Oct 2001 18:49:32 +0000]
A user might belong to only a single group
(the group equal to the group id).
p4raw-id: //depot/perl@12572
Jarkko Hietaniemi [Mon, 22 Oct 2001 18:36:46 +0000]
Prepending (instead of replacing with) the pwd is safer.
p4raw-id: //depot/perl@12571
Jarkko Hietaniemi [Mon, 22 Oct 2001 18:34:54 +0000]
Be more robust if no hostname or domainname
(especially the latter)
p4raw-id: //depot/perl@12570
Artur Bergman [Mon, 22 Oct 2001 17:41:07 +0000]
Flush IO buffers before starting a thread, this mimics fork and seems like a saneer behaviour.
p4raw-id: //depot/perl@12569
Jarkko Hietaniemi [Mon, 22 Oct 2001 12:56:20 +0000]
Update Changes.
p4raw-id: //depot/perl@12567
Michael G. Schwern [Mon, 22 Oct 2001 03:48:38 +0000]
Undeprecating $]
Message-ID: <
20011022034838.B1676@blackrider>
p4raw-id: //depot/perl@12566
Jarkko Hietaniemi [Mon, 22 Oct 2001 12:21:28 +0000]
Pod nits, as suggested by Stas Bekman.
p4raw-id: //depot/perl@12565
Paul Marquess [Sun, 21 Oct 2001 21:11:15 +0000]
Fix for FETCH/NEXTKEY problem in all *DB*_File modules
Message-ID: <AIEAJICLCBDNAAOLLOKLAEOMDCAA.paul.marquess@openwave.com>
p4raw-id: //depot/perl@12564
Jarkko Hietaniemi [Mon, 22 Oct 2001 12:15:19 +0000]
Integrate change #12559 from maintperl;
various fixes for system() and backticks under windows
p4raw-link: @12559 on //depot/maint-5.6/perl:
c196af81e4de7395bbcca7607214cb47be8a55c0
p4raw-id: //depot/perl@12563
p4raw-integrated: from //depot/maint-5.6/perl@12562 'merge in'
win32/win32.c (@12146..)
Jarkko Hietaniemi [Mon, 22 Oct 2001 12:05:35 +0000]
Integrate change #12560 from maintperl;
make pl2bat use %0 rather than "%0" (the latter fails to work
in a lot of common cases)
p4raw-link: @12560 on //depot/maint-5.6/perl:
f7451daad24bee267a6c7292f49dce0eb5051b3d
p4raw-id: //depot/perl@12562
p4raw-integrated: from //depot/maint-5.6/perl@12561 'copy in'
win32/bin/pl2bat.pl (@5902..)
Jarkko Hietaniemi [Mon, 22 Oct 2001 12:00:23 +0000]
Integrate changes #12549 and #12550 from maintperl;
readline() doesn't work with our variables; it confuses them with
my variables (change#4227 was incomplete)
p4raw-link: @12549 on //depot/maint-5.6/perl:
5e948b4e169e88676c1f1359a0a62d670c4b4221
p4raw-link: @4227 on //depot/perl:
77ca0c92d2c0e47301d906d355d9ab3afb6f6bcb
p4raw-id: //depot/perl@12561
p4raw-integrated: from //depot/maint-5.6/perl@12558 'copy in'
t/base/rs.t (@8152..) 'edit in' toke.c (@12549..)
Nick Ing-Simmons [Mon, 22 Oct 2001 08:58:42 +0000]
Integrate ithreads buffer flush fix from perlio
p4raw-id: //depot/perl@12558
Nick Ing-Simmons [Mon, 22 Oct 2001 08:35:09 +0000]
All tests pass (legitimately) on ithreads
p4raw-id: //depot/perlio@12557
Nick Ing-Simmons [Mon, 22 Oct 2001 06:51:22 +0000]
Integrate non-ithreads fix to mainline
p4raw-id: //depot/perl@12556
Nick Ing-Simmons [Mon, 22 Oct 2001 06:48:33 +0000]
Restore non-ithreads build. Interestingly binmode test passes
non-ithreads - so crlf layer is not damaged and ithreads fail
is a symptom ...
p4raw-id: //depot/perlio@12555
Jarkko Hietaniemi [Sun, 21 Oct 2001 22:21:55 +0000]
Integrate from perlio; restructuring.
p4raw-id: //depot/perl@12554
Nick Ing-Simmons [Sun, 21 Oct 2001 19:18:12 +0000]
Win32 PerlIO_cleanup special cases should no longer be required.
p4raw-id: //depot/perlio@12552
Nick Ing-Simmons [Sun, 21 Oct 2001 19:16:56 +0000]
Multiple win32io.o is fatal for GCC (and noise with VC++)
p4raw-id: //depot/perlio@12551
Nick Ing-Simmons [Sun, 21 Oct 2001 17:15:54 +0000]
Convert rest of PerlIO's memory tables to per-interp and add clone functions
for them. Call explicit cleanup during destruct process.
- one binmode test is failing
- also ext/threads/t/basic.t fails under make test, and is noisy under
harness. (Threads results are intermingled and don't match order expected.)
p4raw-id: //depot/perlio@12547
Jarkko Hietaniemi [Sun, 21 Oct 2001 16:12:08 +0000]
Implement multicharacter case mappings where a single
Unicode character can be mapped into several.
p4raw-id: //depot/perl@12546
Artur Bergman [Sun, 21 Oct 2001 15:25:16 +0000]
First support of threads::shared, support shared svs and references.
p4raw-id: //depot/perl@12545
Nick Ing-Simmons [Sun, 21 Oct 2001 14:52:35 +0000]
PerlIO layer table as PL_perlio (per-interpreter)
p4raw-id: //depot/perlio@12544
Jarkko Hietaniemi [Sun, 21 Oct 2001 13:36:40 +0000]
Prettyprinting.
p4raw-id: //depot/perl@12543
Sean M. Burke [Sat, 20 Oct 2001 17:51:09 +0000]
perlpodspec and perlpod rewrite, draft 3 "final"
Message-Id: <3.0.6.32.
20011020175109.007cb3d0@mail.spinn.net>
p4raw-id: //depot/perl@12542
Nick Ing-Simmons [Sat, 20 Oct 2001 22:23:53 +0000]
Fix typos in new locking on MemShared
Make buffers in PerlIOBuf_* in per-thread heap (they are cloned after all...)
- seems to make segfaults more deterministic - suspect they are
attempt to free() after Interp and Host have gone.
p4raw-id: //depot/perlio@12541
Nick Ing-Simmons [Sat, 20 Oct 2001 21:50:46 +0000]
Remove the MemShared re-#define (again)
p4raw-id: //depot/perlio@12540
Nick Ing-Simmons [Sat, 20 Oct 2001 21:49:06 +0000]
Use locks on MemShared
p4raw-id: //depot/perlio@12539
chromatic [Sat, 20 Oct 2001 11:13:47 +0000]
[REPATCH installhtml] Re: installhtml needs a good beating out
Message-ID: <
20011020172003.60024.qmail@onion.perl.org>
p4raw-id: //depot/perl@12538
Nick Ing-Simmons [Sat, 20 Oct 2001 16:44:03 +0000]
Integrate mainline
p4raw-id: //depot/perlio@12537
Jarkko Hietaniemi [Sat, 20 Oct 2001 15:58:00 +0000]
Update Changes.
p4raw-id: //depot/perl@12536
Jarkko Hietaniemi [Sat, 20 Oct 2001 15:18:57 +0000]
Upgrade to podlators 1.11, from Russ Allbery.
p4raw-id: //depot/perl@12535
Jarkko Hietaniemi [Sat, 20 Oct 2001 15:14:25 +0000]
Integrate perlio:
[ 12532]
Extract doio.c's open(2) mode to string conversion as PerlIO_intmod2str()
Use for non-PERLIO fdupopen().
p4raw-link: @12532 on //depot/perlio:
06c7082d6226d352105bade1a7e185ff0a49e896
p4raw-id: //depot/perl@12534
Jarkko Hietaniemi [Sat, 20 Oct 2001 14:42:33 +0000]
Update to Getopt::Long 2.26_02, from Johan Vromans.
p4raw-id: //depot/perl@12533
Nick Ing-Simmons [Sat, 20 Oct 2001 14:25:37 +0000]
Extract doio.c's open(2) mode to string conversion as PerlIO_intmod2str()
Use for non-PERLIO fdupopen().
p4raw-id: //depot/perlio@12532
Jarkko Hietaniemi [Sat, 20 Oct 2001 14:05:47 +0000]
Integrate perlio:
[ 12530]
Fixed in two places - p4 resolve
[ 12529]
Fix for ithreads/stdio build
[ 12525]
Avoid calling (now non-existant) Perl_sv_setsv(), by calling
Perl_sv_setsv_flags directly.
[ 12524]
Add a new flag character 'm' to embed.pl set to represent
"functions" which are really macros. Use it foe the troublesome
sv_setsv() etc. macros in sv.h - changing latter to define
sv_setsv rather than sv_setsv_macro etc.
[ 12523]
Add comments explaining why win32.h/embed.h are included where they are
in perl.h
[ 12522]
Code PerlIOWin32_dup - does not fix Win32 problems as :win32 is not
being used yet.
[ 12511]
Fix gross win32 build issues
p4raw-link: @12530 on //depot/perlio:
ed1c0269a31901e89fe8c0090d5c6cb7881eeb2f
p4raw-link: @12529 on //depot/perlio:
e0fa5af24242618e2201252ebce12dfc87892dd1
p4raw-link: @12525 on //depot/perlio:
485caab953a6ba703128628417a156139b8e7a26
p4raw-link: @12524 on //depot/perlio:
af3c7592a74e7782bf0779c3272ee86140fadf53
p4raw-link: @12523 on //depot/perlio:
66a93824ccd37b2948fb857056747c3314d2a08c
p4raw-link: @12522 on //depot/perlio:
aa98ed8a09f34fb745cd31d496ab825619d2c82d
p4raw-link: @12511 on //depot/perlio:
a0ae667081b123207d4d0f2b6e6b7a5597859a57
p4raw-id: //depot/perl@12531
Nick Ing-Simmons [Sat, 20 Oct 2001 12:53:30 +0000]
Fixed in two places - p4 resolve
p4raw-id: //depot/perlio@12530
Nick Ing-Simmons [Sat, 20 Oct 2001 12:51:05 +0000]
Fix for ithreads/stdio build
p4raw-id: //depot/perlio@12529
Michael G. Schwern [Sat, 20 Oct 2001 01:41:21 +0000]
Using Pod::Man instead of pod2man
Message-Id: <
20011020014121.I3681@blackrider>
p4raw-id: //depot/perl@12528
Michael G. Schwern [Sat, 20 Oct 2001 02:04:21 +0000]
Minor typo
Message-Id: <
20011020020421.A11732@blackrider>
p4raw-id: //depot/perl@12527
chromatic [Fri, 19 Oct 2001 22:46:39 +0000]
Fix Some Pod Typos
Message-Id: <
20011020045254.73112.qmail@onion.perl.org>
p4raw-id: //depot/perl@12526
Nick Ing-Simmons [Sat, 20 Oct 2001 11:16:18 +0000]
Avoid calling (now non-existant) Perl_sv_setsv(), by calling
Perl_sv_setsv_flags directly.
p4raw-id: //depot/perlio@12525
Nick Ing-Simmons [Sat, 20 Oct 2001 10:28:17 +0000]
Add a new flag character 'm' to embed.pl set to represent
"functions" which are really macros. Use it foe the troublesome
sv_setsv() etc. macros in sv.h - changing latter to define
sv_setsv rather than sv_setsv_macro etc.
p4raw-id: //depot/perlio@12524
Nick Ing-Simmons [Sat, 20 Oct 2001 09:17:17 +0000]
Add comments explaining why win32.h/embed.h are included where they are
in perl.h
p4raw-id: //depot/perlio@12523
Nick Ing-Simmons [Sat, 20 Oct 2001 08:27:44 +0000]
Code PerlIOWin32_dup - does not fix Win32 problems as :win32 is not
being used yet.
p4raw-id: //depot/perlio@12522
Jarkko Hietaniemi [Sat, 20 Oct 2001 02:36:21 +0000]
Wording tweaks.
p4raw-id: //depot/perl@12521
Raul Dias [Fri, 19 Oct 2001 22:45:32 +0000]
IO module with nonblocking socket connect patch
Message-Id: <
200110200145.f9K1jWW08398@stratus.swi.com.br>
p4raw-id: //depot/perl@12520
Jarkko Hietaniemi [Sat, 20 Oct 2001 00:51:07 +0000]
Test vertical whitespace combined with /x in \p{}.
p4raw-id: //depot/perl@12519
Gisle Aas [Fri, 19 Oct 2001 16:46:02 +0000]
PERL_MM_USE_DEFAULT
Message-ID: <lrofn3i479.fsf_-_@caliper.ActiveState.com>
p4raw-id: //depot/perl@12518
Jarkko Hietaniemi [Fri, 19 Oct 2001 23:59:34 +0000]
No more this symbol.
p4raw-id: //depot/perl@12517
Jarkko Hietaniemi [Fri, 19 Oct 2001 23:57:48 +0000]
Integrate change #12511; fix gross win32 build issues.
p4raw-link: @12511 on //depot/perlio:
a0ae667081b123207d4d0f2b6e6b7a5597859a57
p4raw-id: //depot/perl@12516
Jarkko Hietaniemi [Fri, 19 Oct 2001 23:16:06 +0000]
Unpack in scalar context should return the first value
returned in list context, as pointed out by Ton Hospel
in 2001-05-21 (this is how it works already in blead,
just adding the test).
p4raw-id: //depot/perl@12515
Craig A. Berry [Fri, 19 Oct 2001 16:59:30 +0000]
perldoc.PL tweak for VMS
Message-Id: <5.1.0.14.2.
20011019162623.021e3868@exchi01>
p4raw-id: //depot/perl@12514
Charles Lane [Fri, 19 Oct 2001 17:45:23 +0000]
vmsish fix, ieee rand() cleanup
Message-Id: <
011019174427.d749b@DUPHY4.Physics.Drexel.Edu>
p4raw-id: //depot/perl@12513
Charles Lane [Fri, 19 Oct 2001 17:26:35 +0000]
two fake test failures on VMS fixed
Message-Id: <
011019172623.11292c@DUPHY4.Physics.Drexel.Edu>
p4raw-id: //depot/perl@12512
Nick Ing-Simmons [Fri, 19 Oct 2001 19:55:36 +0000]
Fix gross win32 build issues
p4raw-id: //depot/perlio@12511
David Dyck [Fri, 19 Oct 2001 13:36:09 +0000]
Re: find2perl and File::Find on cdrom filesystems (with Tel's patch applied to perl-current)
Message-ID: <Pine.LNX.4.33.
0110191309310.28510-100000@dd.tc.fluke.com>
p4raw-id: //depot/perl@12510
SADAHIRO Tomoyuki [Tue, 16 Oct 2001 01:50:16 +0000]
Re: PerlIO and Encode
Message-Id: <
20011016014150.0C8E.BQW10602@nifty.com>
p4raw-id: //depot/perl@12509
Abhijit Menon-Sen [Fri, 19 Oct 2001 17:59:16 +0000]
C<foo I<bar>> hunks from <
20011019014551.A35625@not.autrijus.org>.
(See #12499)
p4raw-id: //depot/perl@12508
Nick Ing-Simmons [Fri, 19 Oct 2001 16:30:43 +0000]
Integrate mainline
p4raw-id: //depot/perlio@12507
Jarkko Hietaniemi [Fri, 19 Oct 2001 14:20:15 +0000]
Retract the #10451 which seems to be the cause
of the major leakage from while(){eval"sub{}"}
p4raw-id: //depot/perl@12506
Jarkko Hietaniemi [Fri, 19 Oct 2001 13:39:59 +0000]
Regen toc.
p4raw-id: //depot/perl@12505
Jarkko Hietaniemi [Fri, 19 Oct 2001 13:35:59 +0000]
Tiny tweaks.
p4raw-id: //depot/perl@12504
Abe Timmerman [Fri, 19 Oct 2001 14:12:40 +0000]
Re: perlintro.pod
Message-Id: <ls40ttsmrr3rpjlm3dqhh8v60onsiopmuc@4ax.com>
p4raw-id: //depot/perl@12503
Abhijit Menon-Sen [Fri, 19 Oct 2001 13:24:12 +0000]
Slight reorganisation of references.
p4raw-id: //depot/perl@12502
Kay Röpke [Fri, 19 Oct 2001 14:04:01 +0000]
[DOC PATCH lib/ExtUtils/MakeMaker.pm] Discouraging use of PREREQ_FATAL in day-to-day Makefile.PL's
Message-Id: <E15uYNb-00040L-00@mrvdom01.schlund.de>
p4raw-id: //depot/perl@12501
Jarkko Hietaniemi [Fri, 19 Oct 2001 03:25:44 +0000]
Unicode categories continue:
implement Category=, Script=, Block=
(these are based on an upcoming update of TR#18)
Fix a bug where we got two In categories named "old italic",
and another where shortcut for the Is categories wasn't taken.
p4raw-id: //depot/perl@12500
Audrey Tang [Fri, 19 Oct 2001 01:45:51 +0000]
a small patch to perlintro.pod.
Message-Id: <
20011019014551.A35625@not.autrijus.org>
(Applied by hand with nits.)
p4raw-id: //depot/perl@12499
Andy Dougherty [Thu, 18 Oct 2001 12:33:59 +0000]
OpenBSD hints for ithreads
Message-ID: <Pine.SOL.4.10.
10110181232060.15040-100000@maxwell.phys.lafayette.edu>
p4raw-id: //depot/perl@12498
Jarkko Hietaniemi [Thu, 18 Oct 2001 16:14:13 +0000]
Retract #12446; the problem solved by #12474.
p4raw-id: //depot/perl@12497
Jarkko Hietaniemi [Thu, 18 Oct 2001 14:06:52 +0000]
More documented In categories.
p4raw-id: //depot/perl@12495
Jarkko Hietaniemi [Thu, 18 Oct 2001 13:04:48 +0000]
Update Changes.
p4raw-id: //depot/perl@12494
Jarkko Hietaniemi [Thu, 18 Oct 2001 12:58:31 +0000]
Add the lib/unicore/To/Spec*.pl to the MANIFEST.
p4raw-id: //depot/perl@12493
Jarkko Hietaniemi [Thu, 18 Oct 2001 12:37:28 +0000]
Wrong skip() arguments.
p4raw-id: //depot/perl@12492
Charles Lane [Wed, 17 Oct 2001 09:10:53 +0000]
try#2: [proposed PATCH Perl@12401] ieee floats, rand() & old systems
Message-Id: <
011017090944.15ad2e@DUPHY4.Physics.Drexel.Edu>
p4raw-id: //depot/perl@12491
Mark-Jason Dominus [Thu, 18 Oct 2001 06:25:35 +0000]
PATCH perl.pod: Suggested reorganization of table of contents
Message-Id: <
20011018102535.19264.qmail@plover.com>
p4raw-id: //depot/perl@12490
Jarkko Hietaniemi [Thu, 18 Oct 2001 02:24:52 +0000]
Prettyprinting.
p4raw-id: //depot/perl@12489
Jarkko Hietaniemi [Thu, 18 Oct 2001 00:47:19 +0000]
Regen toc.
p4raw-id: //depot/perl@12488
Jarkko Hietaniemi [Thu, 18 Oct 2001 00:43:18 +0000]
Add perlintro, from Skud.
p4raw-id: //depot/perl@12487
Jarkko Hietaniemi [Thu, 18 Oct 2001 00:10:44 +0000]
FAQ sync.
p4raw-id: //depot/perl@12486
Jarkko Hietaniemi [Wed, 17 Oct 2001 23:57:15 +0000]
Oh, bother. In Tru64 cc -std1 was looking rather nice
in speed (upto 20% speedup in certain operations) but meanwhile
regexps and arithmetics got slower (5-10%) (according to
perlbench average speedup is negligible, and within measuring
flutter, 1%). Therefore retracting all the changes
aimed at getting -std1 to compile cleanly: #12475, #12476,
#12479, #12480, #12481, #12482, #12483, #12484.
p4raw-id: //depot/perl@12485
Jarkko Hietaniemi [Wed, 17 Oct 2001 21:58:40 +0000]
(retracted by #12485)
Strict ANSI doesn't like the third argument of main()
so enable ignoring it if using ultra picky compiler.
p4raw-id: //depot/perl@12484
Jarkko Hietaniemi [Wed, 17 Oct 2001 21:48:24 +0000]
(retracted by #12485)
Move the VMS_FOO_ERROR codes next to the SETERRNO() definition.
p4raw-id: //depot/perl@12483
Jarkko Hietaniemi [Wed, 17 Oct 2001 21:42:57 +0000]
(retracted by #12485)
Add explanatory comment.
p4raw-id: //depot/perl@12482
Jarkko Hietaniemi [Wed, 17 Oct 2001 20:50:37 +0000]
(retracted by #12485)
More dollar$hiding.
p4raw-id: //depot/perl@12481
Jarkko Hietaniemi [Wed, 17 Oct 2001 20:27:34 +0000]
(retracted by #12485)
KISS.
p4raw-id: //depot/perl@12480
Jarkko Hietaniemi [Wed, 17 Oct 2001 19:57:34 +0000]
(retracted by #12485)
Thou shalt not #ifdef inside macro invocations,
noticed by Rafael Garcia-Suarez.
p4raw-id: //depot/perl@12479
Anton Berezin [Wed, 17 Oct 2001 18:25:48 +0000]
coredump fix in pp_accept()
Message-Id: <
20011017182548.A12082@heechee.tobez.org>
p4raw-id: //depot/perl@12478
Jarkko Hietaniemi [Wed, 17 Oct 2001 16:46:50 +0000]
(retracted by #12485)
Unterminated #ifdef.
p4raw-id: //depot/perl@12476