todo emacs lisp symbol generation, generate doc popup

By Xah Lee. Date: .
xtodo

emacs lisp symbol generation

;; determine if a elisp function is written in C vs not.

(defvar xah-elisp-symbols-c nil "Lisp function written in C")
(defvar xah-elisp-symbols-not-c nil "Lisp function defined in lisp")

(mapcar
 (lambda (x)
   (if (subrp (symbol-function (intern-soft x)))
       (progn
         (push x xah-elisp-symbols-c))
     (progn (push x xah-elisp-symbols-not-c))))
 xah-elisp-all-symbols)

(length xah-elisp-all-symbols)
27324

(length xah-elisp-symbols-c)
9319

(length xah-elisp-symbols-not-c)
18005