(char? x)
Returns true if x is a JavaScript string of length one.
(defn char? [x] (and (string? x) (== 1 (.-length x))))