Lines Matching refs:negated
608 my( $addr1, $addr2, $negated, $opcode, $arg, $fl ) = @_;
616 $cond = $negated ? "unless( $addr1 )\n" : "if( $addr1 )\n";
638 my( $addr1, $addr2, $negated, $opcode, $path, $fl ) = @_;
640 Emit( $addr1, $addr2, $negated, $opcode, $path, $fl );
647 my( $addr1, $addr2, $negated, $opcode, $lab, $fl ) = @_;
671 my( $addr1, $addr2, $negated, $opcode, $arg, $fl ) = @_;
672 push( @BlockStack, [ $fl, $addr1, $addr2, $negated ] );
673 Emit( $addr1, $addr2, $negated, $opcode, $arg, $fl );
679 my( $addr1, $addr2, $negated, $opcode, $arg, $fl ) = @_;
683 $rc = Emit( $addr1, $addr2, $negated, $opcode, $arg, $fl );
694 my( $addr1, $addr2, $negated, $opcode, $lab, $fl ) = @_;
708 Emit( $addr1, $addr2, $negated, $opcode, '', $fl );
714 my( $addr1, $addr2, $negated, $opcode, $arg, $fl ) = @_;
715 my $kwd = $negated ? 'unless' : 'if';
718 if( ! $negated ){
734 my( $addr1, $addr2, $negated, $opcode, $arg, $fl ) = @_;
1237 my( $negated, $naddr, $addr1, $addr2 );
1280 $negated = $cmd =~ s/^!\s*//;
1290 print 'negated' if $useDEBUG && $negated;
1468 if( &{$tabref->[2]}( $addr1, $addr2, $negated,