[armedbear-devel] function (setf documentation) has disappeared
Hi, It seems that the DEFSETF for DOCUMENTATION has disappeared recently. -- Eric Marsden
On Jan 6, 2013, at 17:33, Eric Marsden <eric.marsden@free.fr> wrote:
It seems that the DEFSETF for DOCUMENTATION has disappeared recently.
Hi Eric, Can you give a recipe? Some stuff seems to work: CL-USER(1): (defun foo (x) x) FOO CL-USER(2): (setf (documentation 'foo 'function) "Horx") "Horx" CL-USER(3): (documentation 'foo 'function) "Horx" CL-USER(4): It's not that I don't trust you -- DOCUMENTATION was moved into its own file recently, and we have the ansi-test PSETF.37 failure because autoloading fails for (setf foo) functions. Does it work if you call DOCUMENTATION before calling SETF DOCUMENTATION? Rudi
"rs" == Rudolf Schlatte <rudi@constantly.at> writes:
rs> It's not that I don't trust you -- DOCUMENTATION was moved into rs> its own file recently, and we have the ansi-test PSETF.37 failure rs> because autoloading fails for (setf foo) functions. Does it work rs> if you call DOCUMENTATION before calling SETF DOCUMENTATION? Hi Rudi, Yes, it does seem to be an autoloading problem. ,---- | Armed Bear Common Lisp 1.2.0-dev-svn-14349 | Java 1.6.0_18 Sun Microsystems Inc. | OpenJDK 64-Bit Server VM | Low-level initialization completed in 0.241 seconds. | Startup completed in 1.128 seconds. | Type ":help" for a list of available commands. | CL-USER(1): (defun foo (x) x) | FOO | CL-USER(2): (setf (documentation 'foo 'function) "Horx") | #<THREAD "interpreter" {482982BF}>: Debugger invoked on condition of type UNDEFINED-FUNCTION | The function (SETF DOCUMENTATION) is undefined. `---- If I call DOCUMENTATION first, the DEFSETF works correctly. -- Eric Marsden
On Jan 6, 2013, at 18:23, Eric Marsden <eric.marsden@free.fr> wrote:
"rs" == Rudolf Schlatte <rudi@constantly.at> writes:
rs> It's not that I don't trust you -- DOCUMENTATION was moved into rs> its own file recently, and we have the ansi-test PSETF.37 failure rs> because autoloading fails for (setf foo) functions. Does it work rs> if you call DOCUMENTATION before calling SETF DOCUMENTATION?
Hi Rudi,
Yes, it does seem to be an autoloading problem.
,---- | Armed Bear Common Lisp 1.2.0-dev-svn-14349 | Java 1.6.0_18 Sun Microsystems Inc. | OpenJDK 64-Bit Server VM | Low-level initialization completed in 0.241 seconds. | Startup completed in 1.128 seconds. | Type ":help" for a list of available commands. | CL-USER(1): (defun foo (x) x) | FOO | CL-USER(2): (setf (documentation 'foo 'function) "Horx") | #<THREAD "interpreter" {482982BF}>: Debugger invoked on condition of type UNDEFINED-FUNCTION | The function (SETF DOCUMENTATION) is undefined. `----
If I call DOCUMENTATION first, the DEFSETF works correctly.
Thanks - I can reproduce this with "abcl --noinit". Logged at http://trac.common-lisp.net/armedbear/ticket/285 as a duplicate of #266. Rudi
participants (2)
-
Eric Marsden -
Rudolf Schlatte