In perl.git, the branch tonyc/smartmatch-rebased has been created <http://perl5.git.perl.org/perl.git/commitdiff/29aa8d31201c6a6a8a51eb7c7ae0f87c6e51a67a?hp=0000000000000000000000000000000000000000>
at 29aa8d31201c6a6a8a51eb7c7ae0f87c6e51a67a (commit) - Log ----------------------------------------------------------------- commit 29aa8d31201c6a6a8a51eb7c7ae0f87c6e51a67a Author: Father Chrysostomos <spr...@cpan.org> Date: Thu Sep 13 00:18:28 2012 -0700 New whirled order for givwhen/last/next given now responds to last and next. break only breaks out of given, and does not complain about an inner foreach. when and default do an implicit regular next, not a âspecialâ next that only breaks out of foreach() and given. M embed.fnc M embed.h M pod/perldiag.pod M pp_ctl.c M proto.h M t/op/switch.t commit bf8d4bfaf10c09b68140203475296ad76e27b790 Author: Father Chrysostomos <spr...@cpan.org> Date: Wed Sep 12 16:33:49 2012 -0700 toke.c: use goto to reduce repetitition I couldnât think of a name for the label that didnât just repeat what the code was doing (increment_lex_allbrackets_and_set_PL_expect), so I gave it an arbitrary short name. M toke.c commit 1df540b06bbcbb90a3c642a671564edd068bb686 Author: Father Chrysostomos <spr...@cpan.org> Date: Wed Sep 12 00:21:12 2012 -0700 Smart Match 3⢠I was persuaded by Smylersâ argument concerning string equivalence: <20120905143040.gz1...@stripey.com> But it is not too late for me to be overruled since this is not in blead yet. The list is: RHS type 1. undef 2. ~~ overloading 3. reftype eq CODE 4. reftype eq REGEXP 5. fall back to eq One question still remains: Should undef ~~ "string" give a warning? Currently it doesnât, but neither does it call eq overloading on the RHS if we actually have undef ~~ $overloaded_object_without_smartmatch. This cannot be merged until we solve the fact that smart match is used in: cpan/autodie/lib/Fatal.pm cpan/autodie/t/exceptions.t This does not deal with loop controls yet, just smartmatch and the smartmatch aspects of of givwhen. M embed.fnc M embed.h M ext/XS-APItest/t/fetch_pad_names.t M op.c M opcode.h M perl.h M perly.act M perly.h M perly.tab M perly.y M pod/perldiag.pod M pp_ctl.c M proto.h M regen/opcodes M t/op/smartmatch.t M t/op/switch.t M t/op/taint.t M toke.c ----------------------------------------------------------------------- -- Perl5 Master Repository