CL is cryptic

I'm trying to define export-defun macro, that would automatically export defined function, but produces error "These symbols are not accessible in the XYZ package" with ASDF. How would you fix it?


(defmacro export-defun (pkg name args &body body)
  (unless (find-package pkg)
    (make-package pkg))
  (let ((sym (intern (symbol-name name) pkg)))
    `(progn (defun ,sym ,args ,@body)
            (export ',sym))))

>>15
Who do you think standardized the English language? If you read any pre-US letters, documents and literature you'll notice that there is no consistency. Yet, if you look at the first US documents, i.e. The Declaration of Independence, The Constitution, etc. you'll notice it's very consistent with modern English. That's because English wasn't standardized until the US decided to standardize it in order to make such documents more specific in their meaning.

Obviously it's no coincidence that British English is 99.999% the same as US English. They adopted it and that they fucked up a handful of words like color is their problem.

>>17
Try reading some Shakespeare.