Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Execution of a form compiled with errors.
- Form:
- #'(SB-INT:NAMED-LAMBDA RECT-FILE
- (PATH WIDTH HEIGHT &OPTIONAL (DEFAULT NIL) (PATH (STRING PATH)))
- (DECLARE (SB-C::TOP-LEVEL-FORM))
- "
- "
- (BLOCK RECT-FILE
- (WITH-OPEN-FILE
- (*STANDARD-OUTPUT* PATH :DIRECTION :OUTPUT :IF-DOES-NOT-EXIST
- :CREATE)
- (FORMAT T "~{~{~s~^ ~}~%~}"
- (LOOP :REPEAT HEIGHT
- :COLLECT (LOOP :REPEAT WIDTH
- :COLLECT DEFAULT))))))
- Compile-time error:
- The variable PATH occurs more than once in the lambda list.
- [Condition of type SB-INT:COMPILED-PROGRAM-ERROR]
- Restarts:
- 0: [RETRY] Retry SLY mREPL evaluation request.
- 1: [*ABORT] Return to SLY's top level.
- 2: [ABORT] abort thread (#<THREAD tid=37409 "sly-channel-1-mrepl-remote-1" RUNNING {1000B780A3}>)
- Backtrace:
- 0: ("top level form") [toplevel]
- 1: (SB-FASL::LOAD-FASL-GROUP #S(SB-FASL::FASL-INPUT :STREAM #<SB-SYS:FD-STREAM for "file /home/ryan/Downloads/nicclim.fasl" {1006F5ECD3}> :TABLE #(2021 #1="~/Downloads/nicclim.lisp" "NICCLIM" #2="top lev..
- Locals:
- ARG1 = 0
- ARG2 = NIL
- ARG3 = NIL
- BYTE = 56
- FASL-INPUT = #S(SB-FASL::FASL-INPUT ..)
- N-OPERANDS = 1
- STREAM = #<SB-SYS:FD-STREAM for "file /home/ryan/Downloads/nicclim.fasl" {1006F5ECD3}>
- TRACE = NIL
- Catch-tags:
- SB-FASL::FASL-GROUP-END
- 2: ((LAMBDA NIL :IN SB-FASL::LOAD-AS-FASL))
- 3: (SB-IMPL::CALL-WITH-LOADER-PACKAGE-NAMES #<FUNCTION (LAMBDA NIL :IN SB-FASL::LOAD-AS-FASL) {1006F77CDB}>)
- 4: (SB-FASL::LOAD-AS-FASL #<SB-SYS:FD-STREAM for "file /home/ryan/Downloads/nicclim.fasl" {1006F5ECD3}> NIL NIL)
- 5: ((LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) #<SB-SYS:FD-STREAM for "file /home/ryan/Downloads/nicclim.fasl" {1006F5ECD3}> T)
- 6: (SB-FASL::CALL-WITH-LOAD-BINDINGS #<FUNCTION (LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) {74C7C24EDC0B}> #<SB-SYS:FD-STREAM for "file /home/ryan/Downloads/nicclim.fasl" {1006F5ECD3}> T #<SB-SYS:FD-STREAM..
- 7: (LOAD "~/Downloads/nicclim.fasl" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST :ERROR :EXTERNAL-FORMAT :DEFAULT)
- 8: (SB-INT:SIMPLE-EVAL-IN-LEXENV (LOAD "~/Downloads/nicclim.fasl") #<NULL-LEXENV>)
- 9: (EVAL (LOAD "~/Downloads/nicclim.fasl"))
- 10: ((LAMBDA NIL :IN SLYNK-MREPL::MREPL-EVAL-1))
- 11: (SLYNK::CALL-WITH-RETRY-RESTART "Retry SLY mREPL evaluation request." #<FUNCTION (LAMBDA NIL :IN SLYNK-MREPL::MREPL-EVAL-1) {1006E5F28B}>)
- 12: ((LAMBDA NIL :IN SLYNK-MREPL::MREPL-EVAL-1))
- 13: ((LAMBDA NIL :IN SLYNK::CALL-WITH-LISTENER))
- 14: (SLYNK::CALL-WITH-BINDINGS ((*PACKAGE* . #<PACKAGE "COMMON-LISP-USER">) (*DEFAULT-PATHNAME-DEFAULTS* . #P"/home/ryan/") (* . #1=#P"/home/ryan/Downloads/nicclim.fasl") (** :MCCLIM) (***) (/ #1# T T) ....
- 15: (SLYNK-MREPL::MREPL-EVAL-1 #<SLYNK-MREPL::MREPL mrepl-1-1> "(load \"~/Downloads/nicclim.fasl\")")
- 16: (SLYNK-MREPL::MREPL-EVAL #<SLYNK-MREPL::MREPL mrepl-1-1> "(load \"~/Downloads/nicclim.fasl\")")
- 17: (SLYNK:PROCESS-REQUESTS NIL)
- 18: ((LAMBDA NIL :IN SLYNK::SPAWN-CHANNEL-THREAD))
- 19: ((LAMBDA NIL :IN SLYNK::SPAWN-CHANNEL-THREAD))
- 20: (SLYNK-SBCL::CALL-WITH-BREAK-HOOK #<FUNCTION SLYNK:SLYNK-DEBUGGER-HOOK> #<FUNCTION (LAMBDA NIL :IN SLYNK::SPAWN-CHANNEL-THREAD) {10047C800B}>)
- 21: ((FLET SLYNK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/ryan/.emacs.d/elpa/sly-20240809.2119/slynk/backend/sbcl.lisp") #<FUNCTION SLYNK:SLYNK-DEBUGGER-HOOK> #<FUNCTION (LAMBDA NIL :IN SLYNK::SPAWN-CHA..
- 22: ((LAMBDA NIL :IN SLYNK::CALL-WITH-LISTENER))
- 23: (SLYNK::CALL-WITH-BINDINGS ((*PACKAGE* . #<PACKAGE "COMMON-LISP-USER">) (*DEFAULT-PATHNAME-DEFAULTS* . #P"/home/ryan/") (* . #1=#P"/home/ryan/Downloads/nicclim.fasl") (** :MCCLIM) (***) (/ #1# T T) ....
- 24: ((LAMBDA NIL :IN SLYNK::SPAWN-CHANNEL-THREAD))
- 25: ((FLET SB-UNIX::BODY :IN SB-THREAD::RUN))
- 26: ((FLET "WITHOUT-INTERRUPTS-BODY-" :IN SB-THREAD::RUN))
- 27: ((FLET SB-UNIX::BODY :IN SB-THREAD::RUN))
- 28: ((FLET "WITHOUT-INTERRUPTS-BODY-" :IN SB-THREAD::RUN))
- 29: (SB-THREAD::RUN)
- 30: ("foreign function: call_into_lisp_")
- 31: ("foreign function: funcall1")
Advertisement
Add Comment
Please, Sign In to add comment