Remove trailing whitespace

rakudo · Jan 11, 2018 · 8265efe · 8265efe
1 parent c6b7012
commit 8265efe
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 8 deletions.
diff --git a/src/vm/jvm/Perl6/Ops.nqp b/src/vm/jvm/Perl6/Ops.nqp
@@ -52,15 +52,15 @@ $ops.add_hll_op('perl6', 'p6bindsig', :!inlinable, -> $qastcomp, $op {
     $il.append(JAST::Instruction.new( :op('invokestatic'), $TYPE_P6OPS,
         "p6bindsig", $TYPE_CSD, $TYPE_TC, $TYPE_CSD, "[$TYPE_OBJ" ));
     $il.append(JAST::Instruction.new( :op('dup') ));
-    
+
     my $natlbl := JAST::Label.new( :name('p6bindsig_no_autothread') );
     $il.append(JAST::Instruction.new( :op('ifnonnull'), $natlbl ));
     $il.append(JAST::Instruction.new( :op('aload'), 'cf' ));
     $il.append(JAST::Instruction.new( :op('invokevirtual'),
         $TYPE_CF, 'leave', 'Void' ));
     $il.append(JAST::Instruction.new( :op('return') ));
     $il.append($natlbl);
-    
+
     $il.append(JAST::Instruction.new( :op('astore'), 'csd' ));
     $il.append(JAST::Instruction.new( :op('aload_1') ));
     $il.append(JAST::Instruction.new( :op('getfield'), $TYPE_TC, 'flatArgs', "[$TYPE_OBJ" ));
@@ -145,7 +145,7 @@ my $p6bool := -> $qastcomp, $op {
     my $exprres := $qastcomp.as_jast($op[0]);
     $il.append($exprres.jast);
     $*STACK.obtain($il, $exprres);
-    
+
     my $cond_type := $exprres.type;
     if $cond_type == $RT_INT {
         $il.append(JAST::PushIVal.new( :value(0) ));

diff --git a/src/vm/moar/Perl6/Ops.nqp b/src/vm/moar/Perl6/Ops.nqp
@@ -118,7 +118,7 @@ $ops.add_hll_op('perl6', 'p6store', -> $qastcomp, $op {
     my $value_res := $qastcomp.as_mast($op[1], :want($MVM_reg_obj));
     push_ilist(@ops, $cont_res);
     push_ilist(@ops, $value_res);
-    
+
     my $iscont_reg  := $*REGALLOC.fresh_i();
     my $decont_reg  := $*REGALLOC.fresh_o();
     my $no_cont_lbl := MAST::Label.new();
@@ -130,7 +130,7 @@ $ops.add_hll_op('perl6', 'p6store', -> $qastcomp, $op {
     nqp::push(@ops, MAST::Op.new( :op('assign'), $cont_res.result_reg, $decont_reg ));
     $*REGALLOC.release_register($decont_reg, $MVM_reg_obj);
     nqp::push(@ops, MAST::Op.new( :op('goto'), $done_lbl ));
-    
+
     my $meth_reg := $*REGALLOC.fresh_o();
     nqp::push(@ops, $no_cont_lbl);
     nqp::push(@ops, MAST::Op.new( :op('findmeth'), $meth_reg, $cont_res.result_reg,
@@ -142,7 +142,7 @@ $ops.add_hll_op('perl6', 'p6store', -> $qastcomp, $op {
     ));
     nqp::push(@ops, $done_lbl);
     $*REGALLOC.release_register($meth_reg, $MVM_reg_obj);
-    
+
     MAST::InstructionList.new(@ops, $cont_res.result_reg, $MVM_reg_obj)
 });
 $ops.add_hll_moarop_mapping('perl6', 'p6var', 'p6var');
@@ -169,7 +169,7 @@ $ops.add_hll_op('perl6', 'p6bindassert', -> $qastcomp, $op {
     my $type_res  := $qastcomp.as_mast($op[1], :want($MVM_reg_obj));
     push_ilist(@ops, $value_res);
     push_ilist(@ops, $type_res);
-    
+
     # Emit a type check.
     my $tcr_reg  := $*REGALLOC.fresh_i();
     my $dc_reg   := $*REGALLOC.fresh_o();
@@ -179,7 +179,7 @@ $ops.add_hll_op('perl6', 'p6bindassert', -> $qastcomp, $op {
     nqp::push(@ops, MAST::Op.new( :op('if_i'), $tcr_reg, $lbl_done ));
     $*REGALLOC.release_register($dc_reg, $MVM_reg_obj);
     $*REGALLOC.release_register($tcr_reg, $MVM_reg_int64);
-    
+
     # Error generation.
     proto bind_error($got, $wanted) {
         my %ex := nqp::gethllsym('perl6', 'P6EX');