Uncaught compile error on invalid function form with sb-pcl symbol

[Paul F. Dietz]

(defun bug009 ()
  #'(SB-PCL::SLOW-METHOD))

==>

Can't SET-INFO-VALUE on PCL-internal function
   [Condition of type SIMPLE-ERROR]

Restarts:
 0: [RETRY] Retry SLIME REPL evaluation request.
 1: [*ABORT] Return to SLIME's top level.
 2: [ABORT] abort thread (#<THREAD "new-repl-thread" RUNNING {101E99D1D3}>)

Backtrace:
  0: (SB-INT:SET-INFO-VALUE (SB-PCL::SLOW-METHOD) 3 NIL)
  1: (SB-C::IR1-FINALIZE #<SB-C:COMPONENT :NAME BUG009 {101F4EF6C3}>)
  2: (SB-C::IR1-PHASES #<SB-C:COMPONENT :NAME BUG009 {101F4EF6C3}>)
[...]

[Douglas Katzman (dougk)]

probably the extended-extended-function-designator concept needs to distinguish between extended-function-designators that are standards-specified, and internal ones.
This examples should produce the same error as if it had been:
* (defun foo () #'(badsyntax))
; in: DEFUN FOO
; #'(BADSYNTAX)
;
; caught ERROR:
; (BADSYNTAX) is not a legal function name.