diff options
| author | Marcus Holland-Moritz <mhx-perl@gmx.net> | 2003-06-11 00:10:47 +0200 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-06-11 05:30:53 +0000 |
| commit | c5661c80adf757c3cf464bf5f538fe5082b73584 (patch) | |
| tree | 754239b76e77e56432158413eb352895e036a4b1 /op.c | |
| parent | 5a1dd2ab5c9ca51eda95e7e0025702bdfcd91d9f (diff) | |
| download | perl-c5661c80adf757c3cf464bf5f538fe5082b73584.tar.gz | |
Integrate from maint:
[ 19738]
Subject: Re: [PATCH: maint @ 19733] CL compiler warnings on MSWin32
From: "Marcus Holland-Moritz" <mhx-perl@gmx.net>
Message-ID: <011701c32f8c$62d85ee0$0c2f1fac@R2D2>
p4raw-link: @19738 on //depot/perl: 5a1dd2ab5c9ca51eda95e7e0025702bdfcd91d9fon //depot/maint-5.8/perl: c43a4d73e4c3d92928dd743544b60e43ce02ee9c
p4raw-id: //depot/perl@19739
p4raw-integrated: from //depot/maint-5.8/perl@19738 'copy in'
ext/Encode/encengine.c (@18665..) ext/List/Util/Util.xs
(@18791..) ext/Storable/Storable.xs (@19551..)
ext/POSIX/POSIX.xs (@19704..) ext/threads/threads.xs (@19722..)
'merge in' ext/Thread/Thread.xs (@18145..) pp.h (@19400..) sv.c
(@19653..) perl.c (@19704..) op.c (@19732..)
Diffstat (limited to 'op.c')
| -rw-r--r-- | op.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -194,7 +194,7 @@ Perl_allocmy(pTHX_ char *name) /* check for duplicate declaration */ pad_check_dup(name, - PL_in_my == KEY_our, + (bool)(PL_in_my == KEY_our), (PL_curstash ? PL_curstash : PL_defstash) ); @@ -3744,7 +3744,7 @@ Perl_newFOROP(pTHX_ I32 flags,char *label,line_t forline,OP *sv,OP *expr,OP *blo assert(!loop->op_next); /* for my $x () sets OPpLVAL_INTRO; * for our $x () sets OPpOUR_INTRO; both only used by Deparse.pm */ - loop->op_private = iterpflags; + loop->op_private = (U8)iterpflags; #ifdef PL_OP_SLAB_ALLOC { LOOP *tmp; |