7 logical-xor implementations in source tree

[Oleh Krehel]

Hi all,

I found myself in need of a logical-xor function. There's `xor' 
defined in
array.el. But I don't want my package to depend on array.el. So I 
grepped the
git source of some other definition of `xor'. And I found 7 
results: 7 functions
doing the same thing, none of them in a satisfactory place.

Should we figure out where to put the "main" `xor' and declare the 
rest as
obsolete aliases?

I attach the occurrences that I found.

regards,
Oleh

-*- mode:grep; -*-


7 candidates:
./lisp/array.el:743:(defun xor (pred1 pred2)
./lisp/gnus/spam.el:711:(defun spam-xor (a b)
./lisp/org/org.el:10071:(defun org-xor (a b)
./lisp/play/5x5.el:934:(defun 5x5-xor (x y)
./lisp/proced.el:1197:(defsubst proced-xor (b1 b2)
./lisp/progmodes/idlwave.el:8816:(defmacro idlwave-xor (a b)
./lisp/vc/diff-mode.el:1773:(defsubst diff-xor (a b) (if a (if (not b) a) b))