Support for `cl-defun` -- A Workaround #32

alhassy · 2019-10-31T19:37:09Z

There seems to be no support for cl-defun; which is unfortunate.

The expected approach does not namespace a cl-defun-ed function:

(define-namespace woah-
(cl-defun here ())
)
;; ⇒ here

Temporarily rebinding cl-defun to defun may make things work ... so far, I have been unable to get macrolet or anything else to make this work; the reason may be that I'm macroletting defun to rewrite into cl-defun, which uses defun in its definition?

What I've been able to do thus far is to locally treat defun as producing symbolic lists that begin with cl-defun, but define-namespaces only sees the defun and so rewrites them beforehand and the resulting fragements are then eval-uated.

 (eval (cl-macrolet ((defun (&rest more) `(cons 'cl-defun (quote ,more))))
 
   (define-namespace woah-
   (list 'progn
       
   (defun first  (x &key (y 3)) (+ x y))
   (defun second (x &key (y 3)) (+ x y))
 
   )))) ;; ⇒ woah-first and woah-second are defined

Any alternative approach would be appreciated!

The text was updated successfully, but these errors were encountered:

alhassy changed the title ~~Support for cl-defun -- A Workaround~~ No Support for cl-defun :'( Oct 31, 2019

alhassy changed the title ~~No Support for cl-defun :'(~~ Support for cl-defun -- A Workaround Oct 31, 2019

This was referenced Dec 9, 2022

feat: support cl-defun in namespace macro #36

Merged

fix: use cl-defun instead of defun* kosh04/unicode-escape.el#3

Merged

Provide feedback

Saved searches

Use saved searches to filter your results more quickly

Support for `cl-defun` -- A Workaround #32

Support for `cl-defun` -- A Workaround #32

Support for cl-defun -- A Workaround #32

Support for cl-defun -- A Workaround #32

Comments

Support for `cl-defun` -- A Workaround #32

Support for `cl-defun` -- A Workaround #32