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