cl-png-quicklisp-err?

; script to reproduce:

#!/usr/bin/sbcl --script

(load "~/quicklisp/setup.lisp")

;(asdf:load-system "weir")

(ql:quickload "png")

(png:make-image 4 4 3 16)

------

relevant function in cl-png: https://github.com/ljosa/cl-png/blob/vl-anyversion/image.lisp#L86

------

output:


To load "png":
  Load 1 ASDF system:
    png
; Loading "png"
[package skippy]..................................
[package salza2]..................................
[package zpng]....................................
[package impl-specific-gray]......................
[package trivial-gray-streams]....................
[package flexi-streams]...........................
..................................................
..................................................
..................................................
[package gzip-stream].............................
[package net.hexapodia.image].....................
[package net.hexapodia.image.pcf].................
[package png]; cc -o /home/anders/.cache/common-lisp/sbcl-1.4.5.debian-linux-x64/home/anders/quicklisp/dists/quicklisp/software/cl-png-vl-anyversion-7d0cf5b6-git/grovel__grovel-tmp3BPE71HR.o -c -g -O2 -fdebug-prefix-map=/build/sbcl-Y6O0EJ/sbcl-1.4.5=. -fstack-protector-strong -Wformat -Werror=format-security -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -D_LARGEFILE_SOURCE -D_LARGEFILE64_SOURCE -D_FILE_OFFSET_BITS=64 -fno-omit-frame-pointer -momit-leaf-frame-pointer -fno-pie -I/Applications/Xcode.app/Contents/Developer/Platforms/MacOSX.platform/Developer/SDKs/MacOSX10.7.sdk/usr/X11/include -I/opt/local/include -fPIC -I/home/anders/quicklisp/dists/quicklisp/software/cffi_0.20.0/ /home/anders/.cache/common-lisp/sbcl-1.4.5.debian-linux-x64/home/anders/quicklisp/dists/quicklisp/software/cl-png-vl-anyversion-7d0cf5b6-git/grovel__grovel.c
/home/anders/.cache/common-lisp/sbcl-1.4.5.debian-linux-x64/home/anders/quicklisp/dists/quicklisp/software/cl-png-vl-anyversion-7d0cf5b6-git/grovel__grovel.c: In function ‘main’:
/home/anders/.cache/common-lisp/sbcl-1.4.5.debian-linux-x64/home/anders/quicklisp/dists/quicklisp/software/cl-png-vl-anyversion-7d0cf5b6-git/grovel__grovel.c:11:7: warning: unused variable ‘autotype_tmp’ [-Wunused-variable]
   int autotype_tmp;
       ^~~~~~~~~~~~
; cc -o /home/anders/.cache/common-lisp/sbcl-1.4.5.debian-linux-x64/home/anders/quicklisp/dists/quicklisp/software/cl-png-vl-anyversion-7d0cf5b6-git/grovel__grovel-tmp758YUXMV -g -Wl,--export-dynamic -no-pie /home/anders/.cache/common-lisp/sbcl-1.4.5.debian-linux-x64/home/anders/quicklisp/dists/quicklisp/software/cl-png-vl-anyversion-7d0cf5b6-git/grovel__grovel.o
; /home/anders/.cache/common-lisp/sbcl-1.4.5.debian-linux-x64/home/anders/quicklisp/dists/quicklisp/software/cl-png-vl-anyversion-7d0cf5b6-git/grovel__grovel /home/anders/.cache/common-lisp/sbcl-1.4.5.debian-linux-x64/home/anders/quicklisp/dists/quicklisp/software/cl-png-vl-anyversion-7d0cf5b6-git/grovel__grovel.grovel-tmp.lisp
.; cc -o /home/anders/.cache/common-lisp/sbcl-1.4.5.debian-linux-x64/home/anders/quicklisp/dists/quicklisp/software/cl-png-vl-anyversion-7d0cf5b6-git/wrappers__wrapper-tmp49Q238TW.o -c -g -O2 -fdebug-prefix-map=/build/sbcl-Y6O0EJ/sbcl-1.4.5=. -fstack-protector-strong -Wformat -Werror=format-security -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -D_LARGEFILE_SOURCE -D_LARGEFILE64_SOURCE -D_FILE_OFFSET_BITS=64 -fno-omit-frame-pointer -momit-leaf-frame-pointer -fno-pie -I/Applications/Xcode.app/Contents/Developer/Platforms/MacOSX.platform/Developer/SDKs/MacOSX10.7.sdk/usr/X11/include -I/opt/local/include -fPIC -I/home/anders/quicklisp/dists/quicklisp/software/cffi_0.20.0/ /home/anders/.cache/common-lisp/sbcl-1.4.5.debian-linux-x64/home/anders/quicklisp/dists/quicklisp/software/cl-png-vl-anyversion-7d0cf5b6-git/wrappers__wrapper.c
; cc -o /home/anders/.cache/common-lisp/sbcl-1.4.5.debian-linux-x64/home/anders/quicklisp/dists/quicklisp/software/cl-png-vl-anyversion-7d0cf5b6-git/wrappers.so -shared -g -O2 -fdebug-prefix-map=/build/sbcl-Y6O0EJ/sbcl-1.4.5=. -fstack-protector-strong -Wformat -Werror=format-security -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -D_LARGEFILE_SOURCE -D_LARGEFILE64_SOURCE -D_FILE_OFFSET_BITS=64 -fno-omit-frame-pointer -momit-leaf-frame-pointer -fno-pie /home/anders/.cache/common-lisp/sbcl-1.4.5.debian-linux-x64/home/anders/quicklisp/dists/quicklisp/software/cl-png-vl-anyversion-7d0cf5b6-git/wrappers__wrapper.o
......
Unhandled SB-INT:SIMPLE-PROGRAM-ERROR in thread #<SB-THREAD:THREAD "main thread" RUNNING
                                                   {10005E85B3}>:
  invalid number of arguments: 4

Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {10005E85B3}>
0: (NET.HEXAPODIA.IMAGE:MAKE-IMAGE 4 4 3 16) [external]
1: (SB-INT:SIMPLE-EVAL-IN-LEXENV (NET.HEXAPODIA.IMAGE:MAKE-IMAGE 4 4 3 16) #<NULL-LEXENV>)
2: (EVAL-TLF (NET.HEXAPODIA.IMAGE:MAKE-IMAGE 4 4 3 16) 2 NIL)
3: ((LABELS SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (NET.HEXAPODIA.IMAGE:MAKE-IMAGE 4 4 3 16) 2)
4: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) (NET.HEXAPODIA.IMAGE:MAKE-IMAGE 4 4 3 16) :CURRENT-INDEX 2)
5: (SB-C::%DO-FORMS-FROM-INFO #<CLOSURE (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) {1001B7138B}> #<SB-C::SOURCE-INFO {1001B71343}> SB-C::INPUT-ERROR-IN-LOAD)
6: (SB-INT:LOAD-AS-SOURCE #<SB-SYS:FD-STREAM for "file /data/x/weir/test.lisp" {1001B66843}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading")
7: ((FLET SB-FASL::THUNK :IN LOAD))
8: (SB-FASL::CALL-WITH-LOAD-BINDINGS #<CLOSURE (FLET SB-FASL::THUNK :IN LOAD) {7FFFF674F69B}> #<SB-SYS:FD-STREAM for "file /data/x/weir/test.lisp" {1001B66843}>)
9: ((FLET SB-FASL::LOAD-STREAM :IN LOAD) #<SB-SYS:FD-STREAM for "file /data/x/weir/test.lisp" {1001B66843}> NIL)
10: (LOAD #<SB-SYS:FD-STREAM for "file /data/x/weir/test.lisp" {1001B66843}> :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST T :EXTERNAL-FORMAT :DEFAULT)
11: ((FLET SB-IMPL::LOAD-SCRIPT :IN SB-IMPL::PROCESS-SCRIPT) #<SB-SYS:FD-STREAM for "file /data/x/weir/test.lisp" {1001B66843}>)
12: ((FLET SB-UNIX::BODY :IN SB-IMPL::PROCESS-SCRIPT))
13: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::PROCESS-SCRIPT))
14: (SB-IMPL::PROCESS-SCRIPT "./test.lisp")
15: (SB-IMPL::TOPLEVEL-INIT)
16: ((FLET SB-UNIX::BODY :IN SAVE-LISP-AND-DIE))
17: ((FLET "WITHOUT-INTERRUPTS-BODY-36" :IN SAVE-LISP-AND-DIE))
18: ((LABELS SB-IMPL::RESTART-LISP :IN SAVE-LISP-AND-DIE))

unhandled condition in --disable-debugger mode, quitting

-------

i'm not very fluent in how this works, but it looks like it could be a name conflict with NET.HEXAPODIA.IMAGE:MAKE-IMAGE?