Function: comp-cstr-to-type-spec

comp-cstr-to-type-spec is a byte-compiled function defined in comp-cstr.el.gz.

Signature

(comp-cstr-to-type-spec CSTR)

Documentation

Given CSTR return its type specifier.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/comp-cstr.el.gz
(defun comp-cstr-to-type-spec (cstr)
  "Given CSTR return its type specifier."
  (cl-etypecase cstr
    (comp-cstr-f
     `(function
       ,(mapcar (lambda (x)
                  (cl-etypecase x
                    (comp-cstr (comp-cstr-to-type-spec x))
                    (symbol x)))
                (comp-cstr-f-args cstr))
       ,(comp--simple-cstr-to-type-spec (comp-cstr-f-ret cstr))))
    (comp-cstr
     (comp--simple-cstr-to-type-spec cstr))))