More than 5 years have passed since last update.

tagbodyの中のマクロが展開されてシンボルになっても、タグにはならない。

CommonLisp

Posted at 2014-05-02

(macrolet ((my () :tag))
  (let ((x '(1 2 3)))
    (tagbody
       (my)
       (when x
         (print (pop x))
         (go :tag)))))
; --> 
; in: MACROLET ((MY NIL :TAG))
;     (GO :TAG)
; 
; caught ERROR:
;   attempt to GO to nonexistent tag: :TAG
; 
; compilation unit finished
;   caught 1 ERROR condition

You get articles that match your needs
You can efficiently read back useful information
You can use dark theme

What you can do with signing up