From xemacs-m  Sun Feb  9 18:32:19 1997
Received: from wmperry.in.aventail.com (wmperry@wmperry.oz.net [207.13.185.53])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id SAA19515
	for <xemacs-beta@xemacs.org>; Sun, 9 Feb 1997 18:32:16 -0600 (CST)
Received: (from wmperry@localhost) by wmperry.in.aventail.com (8.7.6/8.7.3) id QAA01486; Sun, 9 Feb 1997 16:37:06 -0800
Date: Sun, 9 Feb 1997 16:37:06 -0800
Message-Id: <199702100037.QAA01486@wmperry.in.aventail.com>
From: "William M. Perry" <wmperry@aventail.com>
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
To: Hrvoje Niksic <hniksic@srce.hr>
Cc: xemacs-beta@xemacs.org
Subject: Re: `subrp' not working?
In-Reply-To: <kigu3nlldo6.fsf@jagor.srce.hr>
References: <kigu3nlldo6.fsf@jagor.srce.hr>
Errors-to: wmperry@aventail.com
Reply-to: wmperry@aventail.com
X-Face: O~Rn;(l][/-o1sALg4A@xpE:9-"'IR[%;,,!m7</SYF`{vYQ(&RI1&EiH[FvT;J}@f!4kfz
 x_!Y#=y{Uuj9GvUi=cPuajQ(Z42R[wE@{G,sn$qGr5g/wnb*"*ktI+,CD}1Z'wxrM2ag-r0p5I6\nA
 [WJopW_J.WY;

Hrvoje Niksic writes:
>This is interesting -- is `subrp' supposed to return t if a symbol is
>a built-in function, nil otherwise?
>
>`C-h d subrp RET'
>subrp: (OBJECT)
>  -- a built-in function.
>T if OBJECT is a built-in function.
>
>(subrp 'subrp)
>   ==> nil
>
>(subrp 'load-internal)
>   ==> nil
>
>(subrp 'or)
>   ==> nil
>
>Checking the source didn't help, as there is nothing obviously wrong
>with F_subrp itself -- it calls the SUBRP macro, which in turns
>expands to RECORDP, which expands to ......
>
>Interestingly enough, GNU Emacs 19.34 seems to exhibit the same
>behaviour.

  subrp() works on the function slot of a symbol, not the symbol itself.
Try:

(subrp (symbol-function 'or)) => t
(subrp (symbol-function 'misc-user-event-p)) => nil

-Bill P.

