* lisp/emacs-lisp/cl-macs.el (character): Can't be negative