Hi all,

is there a specific reason for the absence of 'bxorover'? The patch is trivial.

-jo

diff --git a/lib/PDL/Ufunc.pd b/lib/PDL/Ufunc.pd
index 1adeb636..6dce4d56 100644
--- a/lib/PDL/Ufunc.pd
+++ b/lib/PDL/Ufunc.pd
@@ -152,6 +152,8 @@ EOF
otype => 'int+', op => 'tmp |= ($a() != 0);', leftzero => 'tmp' },
      borover  => { def=>'$GENERIC() tmp', txt => 'bitwise or', init => 0,
                   otype => '', op => 'tmp |= $a() ;', leftzero => '!~tmp' },
+     bxorover  => { def=>'$GENERIC() tmp', txt => 'bitwise xor', init => 0,
+                  otype => '', op => 'tmp ^= $a() ;', leftzero => 0 },
 );
 foreach my $func ( sort keys %over ) {
     my $def   = $over{$func}{def};



_______________________________________________
pdl-devel mailing list
pdl-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/pdl-devel

Reply via email to