[Able-devel] Pro tempore fix

As I told before, ABLE crashes whenever there is a space between an open parenthesis and a token. For instance

(defvar xxx      '(       abc            d e f))

causes a TK crash.A quick fix is to add a condition that deals with an empty token into the get-indent-level macro (see macro.lisp). Thus

(defmacro get-indent-level (token)   "Deduce how much to indent based on the token supplied. The user   can supply their own indentation rules in the configuration file."   `(cond      ((< (length ,token) 1) 1)      ((equal (char ,token 0) +lparen+) 1)      ((equal (length ,token) 1) 3)      ,@(mapcar #'(lambda (rule)                    `((equalp ,token ,(car rule)) ,(cdr rule)))          *indentation-rules*)      (t 2)))