[perl #40272] subroutine call with & in perlop example

[p5sagit/p5-mst-13.2.git] / bytecode.pl

diff --git a/bytecode.pl b/bytecode.pl
index cad64bc..cbbdefa 100644 (file)
--- a/bytecode.pl
+++ b/bytecode.pl
@@ -373,15 +373,15 @@ stop              PL_op                                   U32             s
 stpv           bstate->bs_pv.pvx                       U32             x
 ldspecsv       bstate->bs_sv                           U8              x
 ldspecsvx      bstate->bs_sv                           U8              x
-newsv          bstate->bs_sv                           U8              x
-newsvx         bstate->bs_sv                           U32             x
+newsv          bstate->bs_sv                           svtype          x
+newsvx         bstate->bs_sv                           svtype          x
 newop          PL_op                                   U8              x
 newopx         PL_op                                   U16             x
 newopn         PL_op                                   U8              x
 newpv          none                                    PV
 pv_cur         bstate->bs_pv.xpv.xpv_cur               STRLEN
 pv_free                bstate->bs_pv.pvx                       none            x
-sv_upgrade     bstate->bs_sv                           U8              x
+sv_upgrade     bstate->bs_sv                           svtype          x
 sv_refcnt      SvREFCNT(bstate->bs_sv)                 U32
 sv_refcnt_add  SvREFCNT(bstate->bs_sv)                 I32             x
 sv_flags       SvFLAGS(bstate->bs_sv)                  U32