   (format "\\_<\\(%s\\)?[:#] +\\(%s\\)"
           (regexp-opt
            '(":" "GENERIC" "DEFER" "HOOK" "MACRO" "MATH" "POSTPONE"
-             "PRIMITIVE" "SYNTAX" "TYPED" "TYPED:" "RENAME"))
+             "PRIMITIVE" "SYNTAX" "TYPED" "TYPED:"))
           "\\(\\sw\\|\\s_\\|\\s(\\|\\s)\\)+"))
 
 (defconst factor-alias-definition-regex

    "VARIANT:" "VERTEX-FORMAT:"))

(defconst factor-parsing-words-regex
  (regexp-opt factor-parsing-words 'symbols))

(defconst factor-constant-words
  '("f" "t"))

;; [parsing-word] [vocab-word]
(defconst factor-vocab-ref-regex
  (factor-second-word-regex
   '("IN" "USE" "EXCLUDE" "QUALIFIED" "QUALIFIED-WITH")))

(defconst factor-using-lines-regex
  (concat (syntax-begin '("USING")) ws+ symbols-to-semicolon))

;; [parsing-word] [symbol-word]
(defconst factor-symbol-definition-regex
  (factor-second-word-regex
   '("&" "CONSTANT" "DESTRUCTOR" "FORGET" "HELP" "LIBRARY"
     "MAIN" "STRING" "SYMBOL" "VAR")))

;; [parsing-word] [symbol-word]* ;
(defconst factor-symbols-lines-regex
  (concat (syntax-begin '("SYMBOLS")) ws+ symbols-to-semicolon))

(defconst factor-int-constant-def-regex
  (factor-second-word-regex '("ALIEN" "CHAR" "NAN")))

(defconst factor-type-definition-regex
  (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
  "<[^ >]+>")

(defconst factor-getter-regex
  (one-symbol "\\(?:\\sw\\|\\s_\\)+>>"))

(defconst factor-setter-regex
  (one-symbol ">>\\(?:\\sw\\|\\s_\\)+\\|\\(?:\\sw\\|\\s_\\)+<<"))

(defconst factor-stack-effect-regex
  "\\( ( [^)]* )\\)\\|\\( (( [^)]* ))\\)")
