> Please try it out.  Working towards a release of ASDF soon, so anything
> you could do to help iron out bugs would be very much appreciated!

i did a thoughtless git checkout and rebuild, and i got the attached
backtrace.

the issue is with the new ban on operation instances. note that it
seems to happen during an upgrade of ASDF itself, which may or may not
be relevant.

maybe for a while it should only be a full warning?

my script is basically a build script for an executable SBCL image
that loads all dependencies of our projects except our projects
themselves. the dependencies come from the a mixture of the latest of
quicklisp and my workspace.

hope this helps,

-- 
• attila lendvai
• PGP: 963F 5D5F 45C7 DFCD 0A39
--
“Nobody in the world, nobody in history, has ever gotten their freedom
by appealing to the moral sense of the people who were oppressing
them.”
— Assata Shakur (1947–)
;;; loading the following systems into this image:
   (alexandria cffi uiop trivial-features babel cffi/c2ffi asdf cffi-libffi 
cffi-grovel cffi-toolchain cl-autowrap
    cl-json cl-ppcre cl-plus-c trivial-garbage projectured.sdl 
projectured.document parse-number projectured.editor
    s-xml projectured.projection drakma puri cl-base64 chunga 
trivial-gray-streams flexi-streams usocket sb-bsd-sockets
    cl+ssl sb-posix bordeaux-threads babel-streams cl-fad iolib iolib/base 
iolib/common-lisp split-sequence
    iolib/multiplex iolib/syscalls iolib/grovel iolib/asdf iolib/conf 
iolib/streams iolib/sockets idna swap-bytes
    iolib/pathnames iolib/os local-time rfc2109 rfc2388-binary contextl 
closer-mop lw-compat cl-graph metatilities-base
    cl-containers metabang-bind cl-l10n cl-l10n-cldr iterate cxml cxml-dom 
cxml-xml closure-common cxml-klacks
    cxml-test cl-typesetting cl-pdf zpb-ttf ironclad sb-rotate-byte nibbles 
anaphora sb-sprof cl-postgres+local-time
    cl-postgres md5 moptilities metacopy-with-contextl metacopy 
command-line-arguments cl-smtp sb-cover optima)
To load "alexandria":
  Load 1 ASDF system:
    alexandria
; Loading "alexandria"

debugger invoked on a ASDF/FIND-SYSTEM:FORMATTED-SYSTEM-DEFINITION-ERROR in 
thread
#<THREAD "main thread" RUNNING {10028C70E3}>:
  OPERATION instances must only be created through MAKE-OPERATION.

Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.

restarts (invokable by number or by possibly-abbreviated name):
  0: [RETRY                        ] Retry ASDF operation.
  1: [CLEAR-CONFIGURATION-AND-RETRY] Retry ASDF operation after resetting the 
configuration.
  2: [ABORT                        ] Give up on "alexandria"
  3: [RETRY                        ] Retry EVAL of current toplevel form.
  4: [CONTINUE                     ] Ignore error and continue loading file 
"/home/alendvai/common-lisp/hu.dwim.environment/bin/build-development-image.sh".
  5:                                 Abort loading file 
"/home/alendvai/common-lisp/hu.dwim.environment/bin/build-development-image.sh".
  6:                                 Ignore runtime option --eval 
"(with-open-file (s 
\"/home/alendvai/common-lisp/hu.dwim.environment/bin/build-development-image.sh\"
 :element-type 'character) (read-line s) (load s))".
  7:                                 Skip rest of --eval and --load options.
  8:                                 Skip to toplevel READ/EVAL/PRINT loop.
  9: [EXIT                         ] Exit SBCL (calling #'EXIT, killing the 
process).

(ASDF/FIND-SYSTEM:SYSDEF-ERROR "OPERATION instances must only be created 
through MAKE-OPERATION.")
0] back

Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {10028C70E3}>
0: (ASDF/FIND-SYSTEM:SYSDEF-ERROR "OPERATION instances must only be created 
through MAKE-OPERATION.")
1: ((:METHOD INITIALIZE-INSTANCE :BEFORE (ASDF/OPERATION:OPERATION)) 
#<ASDF/LISP-ACTION:LOAD-OP >) [fast-method]
2: ((LAMBDA NIL :IN 
"/home/alendvai/common-lisp/hu.dwim.environment/bin/build-development-image.sh"))
3: (ASDF/INTERFACE::SYSTEM-LOADED-P CL-GRAPH-SYSTEM::CL-GRAPH)
4: ((FLET #:WRAPPER60 :IN ASDF/INTERFACE::REQUIRED-SYSTEMS-LOADED-P) 
CL-GRAPH-SYSTEM::CL-GRAPH)
5: (SB-KERNEL:%MAP-FOR-EFFECT-ARITY-1 #<CLOSURE (FLET #:WRAPPER60 :IN 
ASDF/INTERFACE::REQUIRED-SYSTEMS-LOADED-P) {7FFFEED1E5DB}> 
(CL-GRAPH-SYSTEM::CL-GRAPH CL-GRAPH-SYSTEM::CL-VARIATES))
6: (ASDF/INTERFACE::REQUIRED-SYSTEMS-LOADED-P 
#<ASDF/INTERFACE::SYSTEM-CONNECTION "cl-graph-and-cl-variates">)
7: ((LAMBDA (ASDF/INTERFACE::CONNECTION) :IN 
ASDF/INTERFACE::LOAD-CONNECTED-SYSTEMS) #<ASDF/INTERFACE::SYSTEM-CONNECTION 
"cl-graph-and-cl-variates">)
8: (ASDF/INTERFACE:MAP-SYSTEM-CONNECTIONS #<FUNCTION (LAMBDA 
(ASDF/INTERFACE::CONNECTION) :IN ASDF/INTERFACE::LOAD-CONNECTED-SYSTEMS) 
{100578253B}>)
9: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> 
#<ASDF/LISP-ACTION:LOAD-OP :VERBOSE NIL> 
#<ASDF/PACKAGE-INFERRED-SYSTEM:PACKAGE-INFERRED-SYSTEM "asdf"> :VERBOSE NIL)
10: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
11: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP 
:VERBOSE NIL> #<ASDF/PACKAGE-INFERRED-SYSTEM:PACKAGE-INFERRED-SYSTEM "asdf"> 
:VERBOSE NIL) [fast-method]
12: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> 
ASDF/LISP-ACTION:LOAD-OP :ASDF :VERBOSE NIL)
13: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
14: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP 
:ASDF :VERBOSE NIL) [fast-method]
15: (ASDF/OPERATE:LOAD-SYSTEM :ASDF :VERBOSE NIL)
16: (ASDF/UPGRADE:UPGRADE-ASDF)
17: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
18: (ASDF/CACHE:CALL-WITH-ASDF-CACHE #<CLOSURE (LAMBDA NIL :IN 
ASDF/OPERATE:OPERATE) {100AC0558B}> :OVERRIDE NIL :KEY NIL)
19: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP 
"alexandria" :VERBOSE NIL) [fast-method]
20: (ASDF/OPERATE:LOAD-SYSTEM "alexandria" :VERBOSE NIL)
21: (QUICKLISP-CLIENT::CALL-WITH-MACROEXPAND-PROGRESS #<CLOSURE (LAMBDA NIL :IN 
QUICKLISP-CLIENT::APPLY-LOAD-STRATEGY) {100AC0279B}>)
22: (QUICKLISP-CLIENT::AUTOLOAD-SYSTEM-AND-DEPENDENCIES "alexandria" :PROMPT 
NIL)
23: ((:METHOD QL-IMPL-UTIL::%CALL-WITH-QUIET-COMPILATION (T T)) #<unavailable 
argument> #<CLOSURE (FLET QUICKLISP-CLIENT::QL :IN QUICKLISP-CLIENT:QUICKLOAD) 
{100ABF30EB}>) [fast-method]
24: ((:METHOD QL-IMPL-UTIL::%CALL-WITH-QUIET-COMPILATION :AROUND (QL-IMPL:SBCL 
T)) #<QL-IMPL:SBCL {1004D5F8A3}> #<CLOSURE (FLET QUICKLISP-CLIENT::QL :IN 
QUICKLISP-CLIENT:QUICKLOAD) {100ABF30EB}>) [fast-method]
25: ((:METHOD QUICKLISP-CLIENT:QUICKLOAD (T)) #<unavailable argument> :PROMPT 
NIL :SILENT NIL :VERBOSE NIL) [fast-method]
26: (QL-DIST::CALL-WITH-CONSISTENT-DISTS #<CLOSURE (LAMBDA NIL :IN 
QUICKLISP-CLIENT:QUICKLOAD) {100ABE81BB}>)
27: ((LAMBDA NIL :IN 
"/home/alendvai/common-lisp/hu.dwim.environment/bin/build-development-image.sh"))
28: (SB-INT:SIMPLE-EVAL-IN-LEXENV (LET* ((TARGET-SYSTEM-NAME (OR 
(UIOP/OS:GETENV "DWIM_SYSTEM_NAME_SUBSTRING") (ERROR 
"DWIM_SYSTEM_NAME_SUBSTRING is not defined"))) (TO-BE-LOADED-SYSTEMS 
(COLLECT-TO-BE-LOADED-SYSTEMS-FOR-DEVELOPMENT-BUILD TARGET-SYSTEM-NAME)) 
(EXCLUDED-SYSTEMS (QUOTE ("swank"))) (OUTPUT-FILENAME (MERGE-PATHNAMES 
(CONCATENATE # TARGET-SYSTEM-NAME "_development") 
(ASDF/OUTPUT-TRANSLATIONS:APPLY-OUTPUT-TRANSLATIONS "/")))) (DOLIST 
(EXCLUDED-SYSTEM EXCLUDED-SYSTEMS) (REMHASH EXCLUDED-SYSTEM 
TO-BE-LOADED-SYSTEMS)) (LET ((TO-BE-LOADED-SYSTEMS (LOOP :FOR K :BEING :THE 
:HASH-KEYS :OF TO-BE-LOADED-SYSTEMS :COLLECT K))) (FORMAT T "~%;;; loading the 
following systems into this image:~&   ~A~%" TO-BE-LOADED-SYSTEMS) 
(QUICKLISP-CLIENT:QUICKLOAD TO-BE-LOADED-SYSTEMS :PROMPT NIL :VERBOSE NIL)) 
(SETF UIOP/IMAGE:*IMAGE-ENTRY-POINT* (QUOTE SB-IMPL::TOPLEVEL-INIT)) (FORMAT T 
"~%;;; saving image to: ~S~%" OUTPUT-FILENAME) (FORMAT T "~%sudo setcap 
'cap_net_raw,cap_net_admin+eip' ~S~%~%" (NAMESTRING OUTPUT-FILENAME)) 
(DELETE-PACKAGE :DEV-BUILD) (UIOP/IMAGE:DUMP-IMAGE OUTPUT-FILENAME :EXECUTABLE 
T :COMPRESSION NIL)) #<NULL-LEXENV>)
29: (SB-EXT:EVAL-TLF (LET* ((TARGET-SYSTEM-NAME (OR (UIOP/OS:GETENV 
"DWIM_SYSTEM_NAME_SUBSTRING") (ERROR "DWIM_SYSTEM_NAME_SUBSTRING is not 
defined"))) (TO-BE-LOADED-SYSTEMS 
(COLLECT-TO-BE-LOADED-SYSTEMS-FOR-DEVELOPMENT-BUILD TARGET-SYSTEM-NAME)) 
(EXCLUDED-SYSTEMS (QUOTE ("swank"))) (OUTPUT-FILENAME (MERGE-PATHNAMES 
(CONCATENATE # TARGET-SYSTEM-NAME "_development") 
(ASDF/OUTPUT-TRANSLATIONS:APPLY-OUTPUT-TRANSLATIONS "/")))) (DOLIST 
(EXCLUDED-SYSTEM EXCLUDED-SYSTEMS) (REMHASH EXCLUDED-SYSTEM 
TO-BE-LOADED-SYSTEMS)) (LET ((TO-BE-LOADED-SYSTEMS (LOOP :FOR K :BEING :THE 
:HASH-KEYS :OF TO-BE-LOADED-SYSTEMS :COLLECT K))) (FORMAT T "~%;;; loading the 
following systems into this image:~&   ~A~%" TO-BE-LOADED-SYSTEMS) 
(QUICKLISP-CLIENT:QUICKLOAD TO-BE-LOADED-SYSTEMS :PROMPT NIL :VERBOSE NIL)) 
(SETF UIOP/IMAGE:*IMAGE-ENTRY-POINT* (QUOTE SB-IMPL::TOPLEVEL-INIT)) (FORMAT T 
"~%;;; saving image to: ~S~%" OUTPUT-FILENAME) (FORMAT T "~%sudo setcap 
'cap_net_raw,cap_net_admin+eip' ~S~%~%" (NAMESTRING OUTPUT-FILENAME)) 
(DELETE-PACKAGE :DEV-BUILD) (UIOP/IMAGE:DUMP-IMAGE OUTPUT-FILENAME :EXECUTABLE 
T :COMPRESSION NIL)) 16 NIL)
30: ((LABELS SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (LET* 
((TARGET-SYSTEM-NAME (OR (UIOP/OS:GETENV "DWIM_SYSTEM_NAME_SUBSTRING") (ERROR 
"DWIM_SYSTEM_NAME_SUBSTRING is not defined"))) (TO-BE-LOADED-SYSTEMS 
(COLLECT-TO-BE-LOADED-SYSTEMS-FOR-DEVELOPMENT-BUILD TARGET-SYSTEM-NAME)) 
(EXCLUDED-SYSTEMS (QUOTE ("swank"))) (OUTPUT-FILENAME (MERGE-PATHNAMES 
(CONCATENATE # TARGET-SYSTEM-NAME "_development") 
(ASDF/OUTPUT-TRANSLATIONS:APPLY-OUTPUT-TRANSLATIONS "/")))) (DOLIST 
(EXCLUDED-SYSTEM EXCLUDED-SYSTEMS) (REMHASH EXCLUDED-SYSTEM 
TO-BE-LOADED-SYSTEMS)) (LET ((TO-BE-LOADED-SYSTEMS (LOOP :FOR K :BEING :THE 
:HASH-KEYS :OF TO-BE-LOADED-SYSTEMS :COLLECT K))) (FORMAT T "~%;;; loading the 
following systems into this image:~&   ~A~%" TO-BE-LOADED-SYSTEMS) 
(QUICKLISP-CLIENT:QUICKLOAD TO-BE-LOADED-SYSTEMS :PROMPT NIL :VERBOSE NIL)) 
(SETF UIOP/IMAGE:*IMAGE-ENTRY-POINT* (QUOTE SB-IMPL::TOPLEVEL-INIT)) (FORMAT T 
"~%;;; saving image to: ~S~%" OUTPUT-FILENAME) (FORMAT T "~%sudo setcap 
'cap_net_raw,cap_net_admin+eip' ~S~%~%" (NAMESTRING OUTPUT-FILENAME)) 
(DELETE-PACKAGE :DEV-BUILD) (UIOP/IMAGE:DUMP-IMAGE OUTPUT-FILENAME :EXECUTABLE 
T :COMPRESSION NIL)) 16)
31: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN 
SB-INT:LOAD-AS-SOURCE) (LET* ((TARGET-SYSTEM-NAME (OR (UIOP/OS:GETENV 
"DWIM_SYSTEM_NAME_SUBSTRING") (ERROR "DWIM_SYSTEM_NAME_SUBSTRING is not 
defined"))) (TO-BE-LOADED-SYSTEMS 
(COLLECT-TO-BE-LOADED-SYSTEMS-FOR-DEVELOPMENT-BUILD TARGET-SYSTEM-NAME)) 
(EXCLUDED-SYSTEMS (QUOTE ("swank"))) (OUTPUT-FILENAME (MERGE-PATHNAMES 
(CONCATENATE # TARGET-SYSTEM-NAME "_development") 
(ASDF/OUTPUT-TRANSLATIONS:APPLY-OUTPUT-TRANSLATIONS "/")))) (DOLIST 
(EXCLUDED-SYSTEM EXCLUDED-SYSTEMS) (REMHASH EXCLUDED-SYSTEM 
TO-BE-LOADED-SYSTEMS)) (LET ((TO-BE-LOADED-SYSTEMS (LOOP :FOR K :BEING :THE 
:HASH-KEYS :OF TO-BE-LOADED-SYSTEMS :COLLECT K))) (FORMAT T "~%;;; loading the 
following systems into this image:~&   ~A~%" TO-BE-LOADED-SYSTEMS) 
(QUICKLISP-CLIENT:QUICKLOAD TO-BE-LOADED-SYSTEMS :PROMPT NIL :VERBOSE NIL)) 
(SETF UIOP/IMAGE:*IMAGE-ENTRY-POINT* (QUOTE SB-IMPL::TOPLEVEL-INIT)) (FORMAT T 
"~%;;; saving image to: ~S~%" OUTPUT-FILENAME) (FORMAT T "~%sudo setcap 
'cap_net_raw,cap_net_admin+eip' ~S~%~%" (NAMESTRING OUTPUT-FILENAME)) 
(DELETE-PACKAGE :DEV-BUILD) (UIOP/IMAGE:DUMP-IMAGE OUTPUT-FILENAME :EXECUTABLE 
T :COMPRESSION NIL)) :CURRENT-INDEX 16)
32: (SB-C::%DO-FORMS-FROM-INFO #<CLOSURE (LAMBDA (SB-KERNEL:FORM &KEY 
:CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) {1007493BCB}> 
#<SB-C::SOURCE-INFO {1007493B83}> SB-C::INPUT-ERROR-IN-LOAD)
33: (SB-INT:LOAD-AS-SOURCE #<SB-SYS:FD-STREAM for "file 
/home/alendvai/common-lisp/hu.dwim.environment/bin/build-development-image.sh" 
{10074902F3}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading")
34: ((FLET SB-FASL::LOAD-STREAM :IN LOAD) #<SB-SYS:FD-STREAM for "file 
/home/alendvai/common-lisp/hu.dwim.environment/bin/build-development-image.sh" 
{10074902F3}> NIL)
35: (LOAD #<SB-SYS:FD-STREAM for "file 
/home/alendvai/common-lisp/hu.dwim.environment/bin/build-development-image.sh" 
{10074902F3}> :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST T :EXTERNAL-FORMAT 
:DEFAULT)
36: ((LAMBDA ()))
37: (SB-INT:SIMPLE-EVAL-IN-LEXENV (WITH-OPEN-FILE (COMMON-LISP-USER::S 
"/home/alendvai/common-lisp/hu.dwim.environment/bin/build-development-image.sh" 
:ELEMENT-TYPE (QUOTE CHARACTER)) (READ-LINE COMMON-LISP-USER::S) (LOAD 
COMMON-LISP-USER::S)) #<NULL-LEXENV>)
38: (EVAL (WITH-OPEN-FILE (COMMON-LISP-USER::S 
"/home/alendvai/common-lisp/hu.dwim.environment/bin/build-development-image.sh" 
:ELEMENT-TYPE (QUOTE CHARACTER)) (READ-LINE COMMON-LISP-USER::S) (LOAD 
COMMON-LISP-USER::S)))
39: (SB-IMPL::PROCESS-EVAL/LOAD-OPTIONS ((:EVAL . "(require :asdf)") (:EVAL . 
"(asdf:load-system :asdf)") (:EVAL . "(with-open-file (s 
\"/home/alendvai/common-lisp/hu.dwim.environment/bin/build-development-image.sh\"
 :element-type 'character) (read-line s) (load s))")))
40: (SB-IMPL::TOPLEVEL-INIT)
41: ((FLET #:WITHOUT-INTERRUPTS-BODY-90 :IN SB-EXT:SAVE-LISP-AND-DIE))
42: ((LABELS SB-IMPL::RESTART-LISP :IN SB-EXT:SAVE-LISP-AND-DIE))

Reply via email to