Function: sxhash
Compute a hash code for OBJ and return it as integer.
(fn OBJ)