I meant that I couldn't figure out how to reproduce the state you get ABCL 
into, but it seems the answer is that one tries to QL:QUICKLOAD :UIOP from 
abcl-1.2.0-dev.

--
A: Because it messes up the order in which people normally read text.
Q: Why is top-posting such a bad idea?
A: Top-posting.
Q: What is the most annoying thing in email?

On Mar 26, 2013, at 3:14 PM, Faré <[email protected]> wrote:

> I unexport the symbol from UIOP/UTILITY long before I unexport it from
> packages that use it.
> Actually, it's precisely because I unexported it from UIOP/UTILITY
> when I evaluated the updated DEFINE-PACKAGE for it that I unexport it
> from UIOP/DRIVER when I evaluate the updated DEFINE-PACKAGE for the
> latter.
> 
> —♯ƒ • François-René ÐVB Rideau •Reflection&Cybernethics• http://fare.tunes.org
> drug, n:
>        A substance that, injected into a rat, produces a scientific paper.
> 
> 
> On Tue, Mar 26, 2013 at 9:55 AM, Mark Evenson <[email protected]> wrote:
>> On 3/26/13 0039 , Faré wrote:
>>> 
>>> Well, in this case, it looks like it's a bug in ABCL:
>>> 
>>> [1] UIOP/BACKWARD-DRIVER(14): (find-symbol "LOAD-ASDF-DEBUG-UTILITY"
>>> :uiop/utility)
>>> UIOP/UTILITY::LOAD-ASDF-DEBUG-UTILITY
>>> :INTERNAL
>>> [1] UIOP/BACKWARD-DRIVER(15): (find-symbol "LOAD-ASDF-DEBUG-UTILITY"
>>> :uiop/driver)
>>> UIOP/UTILITY::LOAD-ASDF-DEBUG-UTILITY
>>> :EXTERNAL
>>> [1] UIOP/BACKWARD-DRIVER(17): [1] UIOP/BACKWARD-DRIVER(17): (unexport
>>> (find-symbol "LOAD-ASDF-DEBUG-UTILITY" :uiop/driver) :uiop/driver)
>>> Error loading /home/tunes/cl/asdf/build/asdf.lisp at line 5302 (offset
>>> 252109)
>>> #<THREAD "interpreter" {7E6AB533}>: Debugger invoked on condition of
>>> type PACKAGE-ERROR
>>>   The symbol UIOP/UTILITY::LOAD-ASDF-DEBUG-UTILITY is not accessible
>>> in package UIOP/DRIVER
>>> Restarts:
>>>   0: ABORT Return to debug level 1.
>> 
>> 
>> Hmmm.  How did you get into the state where
>> UIOP/UTILITY::LOAD-ASDF-DEBUG-UTILITY is :INTERNAL? asdf.lisp:1017
>> explicitly exports this symbol from what I see.
>> 
>> From ABCL trunk I only see it as an :EXTERNAL symbol:
>> 
>> CL-USER> (lisp-implementation-version)
>> "1.2.0-dev"
>> "Java_HotSpot(TM)_64-Bit_Server_VM-Oracle_Corporation-1.7.0_17-b02"
>> "x86_64-Mac_OS_X-10.8.3"
>> CL-USER> (asdf:asdf-version)
>> "2.32"
>> CL-USER> (find-symbol "LOAD-ASDF-DEBUG-UTILITY" :uiop/driver)
>> UIOP/UTILITY:LOAD-ASDF-DEBUG-UTILITY
>> :EXTERNAL
>> CL-USER> (find-symbol "LOAD-ASDF-DEBUG-UTILITY" :uiop/utility)
>> UIOP/UTILITY:LOAD-ASDF-DEBUG-UTILITY
>> :EXTERNAL
>> CL-USER>
> 

_______________________________________________
asdf-devel mailing list
[email protected]
http://lists.common-lisp.net/cgi-bin/mailman/listinfo/asdf-devel

Reply via email to