DESCRIBE.[14] ANSI regression

[Mark Evenson]

Unfortunately, r14254 broke the DESCRIBE.1 DESCRIBE.2 DESCRIBE.3 DESCRIBE.4 ANSI tests.

[Mark Evenson]

Probably blocking installation of USOCKET from Quicklisp:

The function USOCKET:SOCKET-CONNECT is undefined.
   [Condition of type UNDEFINED-FUNCTION]

Restarts:
 0: [TRY-RECOMPILING] Recompile usocket and try loading it again
 1: [RETRY] Retry loading FASL for #<ASDF:CL-SOURCE-FILE "usocket" "usocket">.
 2: [ACCEPT] Continue, treating loading FASL for #<ASDF:CL-SOURCE-FILE "usocket" "usocket"> as having been successful.
 3: [ABORT] Abort compilation.
 4: [*ABORT] Return to SLIME's top level.
 5: [ABORT] Abort thread.

Backtrace:
  0: (#<FUNCTION {722B302}> #<UNDEFINED-FUNCTION {587BC9A9}> #<FUNCTION {722B302}>)
  1: (APPLY #<FUNCTION {722B302}> (#<UNDEFINED-FUNCTION {587BC9A9}> #<FUNCTION {722B302}>))
  2: (SYSTEM::RUN-HOOK SYSTEM::*INVOKE-DEBUGGER-HOOK* #<UNDEFINED-FUNCTION {587BC9A9}> #<FUNCTION {722B302}>)
  3: (INVOKE-DEBUGGER #<UNDEFINED-FUNCTION {587BC9A9}>)
  4: org.armedbear.lisp.Lisp.error(Lisp.java:382)
  5: org.armedbear.lisp.Primitives$pf_symbol_function.execute(Primitives.java:5244)
  6: (SYMBOL-FUNCTION USOCKET:SOCKET-CONNECT)
  7: (FDEFINITION USOCKET:SOCKET-CONNECT)
  8: (#<STANDARD-GENERIC-FUNCTION (SETF DOCUMENTATION) {78482BAD}> "Connect to `host' on `port'.  `host' is assumed to be a string or
     an IP address represented in vector notation, such as #(192 168 1 1).
     `port' is assumed to be an integer.
     
     `element-type' specifies the element type to use when constructing the
     stream associated with the socket.  The default is 'character.
     
     `nodelay' Allows to disable/enable Nagle's algorithm (http://en.wikipedia.org/wiki/Nagle%27s_algorithm).
     If this parameter is omitted, the behaviour is inher..
  9: (#<FUNCTION (LAMBDA ()) {77164BF6}>)
 10: (FUNCALL #<FUNCTION (LAMBDA ()) {77164BF6}>)
 11: (SYSTEM:INIT-FASL :VERSION 39)

[Mark Evenson]

Let's branch, and revert on the branch?

[rschlatte]

(In [14262]) Fix (describe x 'function) for non-fbound x

• fixes #272