Fix lexical jump errors

2026-09-05 01:13:30 -07:00
parent 956297335d
commit 4aeb7c0be5
3 changed files with 10 additions and 3 deletions
@@ -1,6 +1,6 @@
 ;; -*- mode: lisp-data -*-

-(prin1 (let ((l (block 'c (lambda () (return-from 'c 3)))))
+(prin1 (let ((l (block 'c (lambda () (return-from 'd 3)))))
         (block 'c
                (funcall l))))
 (write-byte ?\n)