Mercurial > hg > xemacs-beta

comparison src/fns.c @ 2:ac2d302a0011 r19-15b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b2
author cvs
date Mon, 13 Aug 2007 08:46:35 +0200
parents 376386a54a3c
children 49a24b4fd526
comparison
equal deleted inserted replaced
1:c0c6a60d29db 2:ac2d302a0011
3134 3134
3135 Lisp_Object Vfeatures; 3135 Lisp_Object Vfeatures;
3136 3136
3137 DEFUN ("featurep", Ffeaturep, Sfeaturep, 1, 1, 0 /* 3137 DEFUN ("featurep", Ffeaturep, Sfeaturep, 1, 1, 0 /*
3138 Return t if FEATURE is present in this Emacs. 3138 Return t if FEATURE is present in this Emacs.
3139 Use this to conditionalize execution of lisp code based on the presence or 3139 Use this to conditionalize execution of lisp code based on the
3140 absence of emacs or environment extensions. 3140 presence or absence of emacs or environment extensions.
3141 Use `provide' to declare that a feature is available. 3141 Use `provide' to declare that a feature is available.
3142 This function looks at the value of the variable `features'. 3142 This function looks at the value of the variable `features'.
3143 */ ) 3143 */ )
3144 (feature) 3144 (feature)
3145 Lisp_Object feature; 3145 Lisp_Object feature;
3150 return (NILP (tem)) ? Qnil : Qt; 3150 return (NILP (tem)) ? Qnil : Qt;
3151 } 3151 }
3152 3152
3153 DEFUN ("provide", Fprovide, Sprovide, 1, 1, 0 /* 3153 DEFUN ("provide", Fprovide, Sprovide, 1, 1, 0 /*
3154 Announce that FEATURE is a feature of the current Emacs. 3154 Announce that FEATURE is a feature of the current Emacs.
3155 This function updates the value of the variable `features'.
3155 */ ) 3156 */ )
3156 (feature) 3157 (feature)
3157 Lisp_Object feature; 3158 Lisp_Object feature;
3158 { 3159 {
3159 Lisp_Object tem; 3160 Lisp_Object tem;