Hi,
It seems that the DEFSETF for DOCUMENTATION has disappeared recently.
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.
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
armedbear-devel@common-lisp.net
-
Eric Marsden -
Rudolf Schlatte