 The set of recognized frameworks can also be overriden on a
 per-buffer basis."
   :type (cons 'set (mapcar (lambda (x)
-                             (cons 'const x))
+                             (list 'const x))
                            espresso--available-frameworks))
   :group 'espresso)
 


(defcustom espresso-comment-lineup-func #'c-lineup-C-comments
  "cc-mode-style lineup function for C comments"
  :type 'boolean
  :group 'espresso)

(defcustom espresso-enabled-frameworks espresso--available-frameworks

;; as the newline is escaped with \. Account for that in the regexp
;; below.
(defconst espresso--regexp-literal
  "[=(,:]\\(?:\\s-\\|\n\\)*\\(/\\)\\(?:\\\\/\\|[^/*]\\)\\(?:\\\\/\\|[^/]\\)*\\(/\\)"
  "Match a regular expression literal. Match groups 1 and 2 are
the characters forming the beginning and end of the literal")

