search

guicho271828 / recursive-macroexpansion

Provides another `macroexpand`
8 stars 0 forks source link

Incorrect handling of flet #2

Open 7c6f434c opened 8 years ago

7c6f434c commented 8 years ago

Code:

(recursive-macroexpansion:rmacroexpand '(flet ((f () 2)) (f)))

Expected result:

(flet ((f () 2)) (f))

Actual result:

(FLET ((F ()
         (FUNCALL 2)))
  (F))