[Ecls-list] Re: CL-Containers error on ECL

[Gary King]

> Heh, that's what I thought, but I looked at the asd file and it had  
> #+ecl ... ECL support is in darcs and I'm guessing the reason I got  
> that error even though I have the darcs version (I can't verify  
> because I'm not at my Mac) is that I had an older version ASDF- 
> Installed.
>
> So, moving to the darcs head for Closer-MOP should fix that.
>

Whoopts, I'm actually "in charge" of keeping the ASDF-Installable  
versions of Closer-MOP, et. al. up to date.

So I tried again now that they are up to date and I've got the  
correct system file. This time, I get:

> [billy-pilgrim:~] gwking% ecl
> ECL (Embeddable Common-Lisp) 0.9h
> Copyright (C) 1984 Taiichi Yuasa and Masami Hagiya
> Copyright (C) 1993 Giuseppe Attardi
> Copyright (C) 2000 Juan J. Garcia-Ripoll
>         ECL is free software, and you are welcome to redistribute it
> under certain conditions; see file 'Copyright' for details.
> Type :h for Help.  Top level.
> > (load "ecl-init")
> ;;; Loading #P"ecl-init.lisp"
> ;;; Loading "/Users/gwking/bin/lisp-shared-setup.lisp"
> #P"ecl-init.lisp"
> > (asdf)
> ;;; Loading "/Users/gwking/darcs/ait/asdf-install/asdf.lisp"
> ;;; Warning: PRINT-OBJECT is being redefined.
> ;;; Warning: PRINT-OBJECT is being redefined.
> ;;; Warning: PRINT-OBJECT is being redefined.
> ;;; Warning: PRINT-OBJECT is being redefined.
> ;;; Warning: PRINT-OBJECT is being redefined.
> ;;; Warning: PRINT-OBJECT is being redefined.
> ;;; Warning: SHARED-INITIALIZE is being redefined.
> ;;; Loading "/Users/gwking/darcs/asdf-binary-locations/asdf-binary- 
> locations.asd"
> ;;; Loading #P"/usr/local/lib/ecl/cmp.fas"
> ;;; Loading #P"/usr/local/lib/ecl/sysfun.lsp"
> ;;; Loading "/Users/gwking/darcs/asdf-binary-locations/dev/main.lisp"
> NIL
> > asdf::*central-registry*
> (*DEFAULT-PATHNAME-DEFAULTS*)
> > (add-to-central-registry "user-home:.asdf-install-dir;systems;")
> ("user-home:.asdf-install-dir;systems;" *DEFAULT-PATHNAME-DEFAULTS*)
> > (asdf:oos 'asdf:load-op 'closer-mop :force t)
> ; loading system definition from
> ; user-home:.asdf-install-dir;systems;closer-mop.asd.NEWEST into
> ; #<ASDF0 package>
> ;;; Loading "/Users/gwking/.asdf-install-dir/systems/closer-mop.asd"
> ; registering #<ASDF:SYSTEM #:CLOSER-MOP 20972480> as CLOSER-MOP
> ; loading system definition from
> ; user-home:.asdf-install-dir;systems;lw-compat.asd.NEWEST into  
> #<ASDF0 package>
> ;;; Loading "/Users/gwking/.asdf-install-dir/systems/lw-compat.asd"
> ; registering #<ASDF:SYSTEM #:LW-COMPAT 20972360> as LW-COMPAT
> ;;; Warning: No architecture feature found in (POWERPC PPC X86  
> X86-64 I686 PC386 IAPX386 SPARC).
> ;;; Compiling /Users/gwking/.asdf-install-dir/site/lw-compat/lw- 
> compat-package.lisp.
> ;;; End of Pass 1.
> ;;; Note: Emiting FUNCALL for SI::DODEFPACKAGE
> ;;; Calling the C compiler...
> ;;; Note:
> ;;; Invoking external command: gcc  -I../include -g -O2 -fPIC -fno- 
> common -fstrict-aliasing -Ddarwin -O "-I/usr/local/lib/ecl//h" -w - 
> c "/Users/gwking/.asdf-install-dir/site/lw-compat/lw-compat- 
> package.c" -o "/Users/gwking/.asdf-install-dir/site/lw-compat/lw- 
> compat-package.o"
>
> ;;; Note:
> ;;; Invoking external command: gcc -o "/Users/gwking/.asdf-install- 
> dir/site/lw-compat/ecl-0.9h-darwin-unknown/lw-compat-package.fas" - 
> L"/usr/local/lib/ecl/" "/Users/gwking/.asdf-install-dir/site/lw- 
> compat/lw-compat-package.o"   -bundle   -lecl   -lm
>
> ;;; OPTIMIZE levels: Safety=2, Space=0, Speed=3
> ;;; Finished compiling /Users/gwking/.asdf-install-dir/site/lw- 
> compat/lw-compat-package.lisp.
> ;;; Loading "/Users/gwking/.asdf-install-dir/site/lw-compat/ 
> ecl-0.9h-darwin-unknown/lw-compat-package.fas"
> ;;; Compiling /Users/gwking/.asdf-install-dir/site/lw-compat/lw- 
> compat.lisp.
> ;;; Compiling (DEFMACRO APPENDF ...).
> ;;; Compiling (DEFMACRO NCONCF ...).
> ;;; Compiling (DEFMACRO REBINDING ...).
> ;;; Compiling (SI:FSET 'REBINDING ...).
> ;;; Warning: Ignore declaration was found for not bound variable  
> #:G278.
> ;;; Compiling (DEFMACRO REMOVEF ...).
> ;;; Compiling (DEFMACRO WHEN-LET ...).
> ;;; Compiling (SI:FSET 'WHEN-LET ...).
> ;;; Warning: Ignore declaration was found for not bound variable  
> #:G302.
> ;;; Compiling (DEFMACRO WHEN-LET* ...).
> ;;; Compiling (SI:FSET 'WHEN-LET* ...).
> ;;; Warning: Ignore declaration was found for not bound variable  
> #:G305.
> ;;; Compiling (DEFMACRO WITH-UNIQUE-NAMES ...).
> ;;; Compiling (SI:FSET 'WITH-UNIQUE-NAMES ...).
> ;;; Warning: Ignore declaration was found for not bound variable  
> #:G310.
> ;;; End of Pass 1.
> ;;; Emitting code for APPENDF.
> ;;; Note: Emitting linking call for GET-SETF-EXPANSION
> ;;; Emitting code for NCONCF.
> ;;; Emitting code for REBINDING.
> ;;; Emitting code for REMOVEF.
> ;;; Emitting code for WHEN-LET.
> ;;; Emitting code for WHEN-LET*.
> ;;; Emitting code for WITH-UNIQUE-NAMES.
> ;;; Calling the C compiler...
> ;;; Note:
> ;;; Invoking external command: gcc  -I../include -g -O2 -fPIC -fno- 
> common -fstrict-aliasing -Ddarwin -O "-I/usr/local/lib/ecl//h" -w - 
> c "/Users/gwking/.asdf-install-dir/site/lw-compat/lw-compat.c" -o "/ 
> Users/gwking/.asdf-install-dir/site/lw-compat/lw-compat.o"
>
> ;;; Note:
> ;;; Invoking external command: gcc -o "/Users/gwking/.asdf-install- 
> dir/site/lw-compat/ecl-0.9h-darwin-unknown/lw-compat.fas" -L"/usr/ 
> local/lib/ecl/" "/Users/gwking/.asdf-install-dir/site/lw-compat/lw- 
> compat.o"   -bundle   -lecl   -lm
>
> ;;; OPTIMIZE levels: Safety=2, Space=0, Speed=3
> ;;; Finished compiling /Users/gwking/.asdf-install-dir/site/lw- 
> compat/lw-compat.lisp.
> ;;; Loading "/Users/gwking/.asdf-install-dir/site/lw-compat/ 
> ecl-0.9h-darwin-unknown/lw-compat.fas"
> ;;; Compiling /Users/gwking/.asdf-install-dir/site/closer-mop/ecl/ 
> closer-mop-packages.lisp.Cannot find symbol "COMPUTE-DISCRIMINATING- 
> FUNCTION" in package #<"CLOS" package>
> Broken at EVAL.
> CLOSER-MOP>>

I'm not sure how to proceed from here. Also, does apropos not work in  
ECL? I tried things like (apropos "bind") and got no results.

thanks,
-- 
Gary Warren King
metabang.com
http://www.metabang.com/
(413) 210 7511
gwking on #lisp (occasionally)