(macrolet ((yoba (x) `(1+ ,x))
(boba (x) (yoba x)))
(print (boba 1)))
KG1hY3JvbGV0ICgoeW9iYSAoeCkgYCgxKyAseCkpCiAgICAgICAgICAgKGJvYmEgKHgpICh5b2JhIHgpKSkKICAocHJpbnQgKGJvYmEgMSkpKQ==
; compiling file "/home/EbqCLS/prog.lisp" (written 11 JAN 2022 04:25:51 PM):
; compiling (PRINT (BOBA 1))
; file: /home/EbqCLS/prog.lisp
; in: MACROLET ((YOBA (X) `(1+ ,X)) (BOBA (X) (YOBA X)))
; (BOBA 1)
;
; caught ERROR:
; during macroexpansion of (BOBA 1). Use *BREAK-ON-SIGNALS* to intercept.
;
; The function COMMON-LISP-USER::YOBA is undefined.
; It is a local function not available at compile-time.
; (PRINT (BOBA 1))
;
; note: The first argument never returns a value.
;
; note: deleting unreachable code
; in: LAMBDA (#:EXPR #:ENV)
; (YOBA X)
;
; caught STYLE-WARNING:
; undefined function: COMMON-LISP-USER::YOBA
;
; compilation unit finished
; Undefined function:
; YOBA
; caught 1 ERROR condition
; caught 1 STYLE-WARNING condition
; printed 2 notes
; wrote /home/EbqCLS/prog.fasl
; compilation finished in 0:00:00.273
Unhandled SIMPLE-ERROR in thread #<SB-THREAD:THREAD "main thread" RUNNING
{10005D05B3}>:
compilation failed
Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {10005D05B3}>
0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<SIMPLE-ERROR "compilation failed" {1001C1A343}> #<unused argument> :QUIT T)
1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<SIMPLE-ERROR "compilation failed" {1001C1A343}>)
2: (INVOKE-DEBUGGER #<SIMPLE-ERROR "compilation failed" {1001C1A343}>)
3: (ERROR "compilation failed")
4: (SB-INT:SIMPLE-EVAL-IN-LEXENV (ERROR "compilation failed") #<NULL-LEXENV>)
5: (SB-INT:SIMPLE-EVAL-IN-LEXENV (WHEN (NTH-VALUE 2 (COMPILE-FILE "prog.lisp")) (ERROR "compilation failed")) #<NULL-LEXENV>)
6: (EVAL (WHEN (NTH-VALUE 2 (COMPILE-FILE "prog.lisp")) (ERROR "compilation failed")))
7: (SB-IMPL::PROCESS-EVAL/LOAD-OPTIONS ((:EVAL . "(when(nth-value 2(compile-file \"prog.lisp\"))(error \"compilation failed\"))") (:EVAL . "(quit)")))
8: (SB-IMPL::TOPLEVEL-INIT)
9: ((FLET SB-UNIX::BODY :IN SAVE-LISP-AND-DIE))
10: ((FLET "WITHOUT-INTERRUPTS-BODY-14" :IN SAVE-LISP-AND-DIE))
11: ((LABELS SB-IMPL::RESTART-LISP :IN SAVE-LISP-AND-DIE))
unhandled condition in --disable-debugger mode, quitting