     (,factor-float-regex . 'factor-font-lock-number)
     (,factor-ratio-regex . 'factor-font-lock-ratio)
     (,factor-type-definition-regex 2 'factor-font-lock-type-name)
-    (,factor-error-regex 2 'factor-font-lock-error-form)
     (,factor-method-definition-regex (1 'factor-font-lock-type-name)
                                      (2 'factor-font-lock-word))
     (,factor-before-definition-regex (1 'factor-font-lock-type-name)

  (factor-second-word-regex
   '("C-STRUCT" "C-UNION" "COM-INTERFACE" "MIXIN" "SINGLETON"
     "SPECIALIZED-ARRAY" "STRUCT" "UNION-STRUCT")))

(defconst factor-error-regex
  (factor-second-word-regex '("ERROR")))

(defconst factor-constructor-regex
  "<[^ >]+>")

       "\\(%s:\\)[ \n]+%s\\(?:[ \n]+\\(<\\)[ \n]+%s\\)?"
       (regexp-opt '("BUILTIN"
                     "ENUM"
                     "ERROR"
                     "PROTOCOL"
                     "STRUCT"
                     "TUPLE"
