Mercurial > emacs

comparison src/data.c @ 1293:95ae0805ebba

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Qbuffer_or_string_p added.
author Joseph Arceneaux <jla@gnu.org>
date Thu, 01 Oct 1992 01:58:57 +0000
parents 0a0646ae381f
children 768d4c10c2bf
comparison
equal deleted inserted replaced
1292:d9a103f4843e 1293:95ae0805ebba
43 Lisp_Object Qend_of_file, Qarith_error; 43 Lisp_Object Qend_of_file, Qarith_error;
44 Lisp_Object Qbeginning_of_buffer, Qend_of_buffer, Qbuffer_read_only; 44 Lisp_Object Qbeginning_of_buffer, Qend_of_buffer, Qbuffer_read_only;
45 Lisp_Object Qintegerp, Qnatnump, Qsymbolp, Qlistp, Qconsp; 45 Lisp_Object Qintegerp, Qnatnump, Qsymbolp, Qlistp, Qconsp;
46 Lisp_Object Qstringp, Qarrayp, Qsequencep, Qbufferp; 46 Lisp_Object Qstringp, Qarrayp, Qsequencep, Qbufferp;
47 Lisp_Object Qchar_or_string_p, Qmarkerp, Qinteger_or_marker_p, Qvectorp; 47 Lisp_Object Qchar_or_string_p, Qmarkerp, Qinteger_or_marker_p, Qvectorp;
48 Lisp_Object Qbuffer_or_string_p;
48 Lisp_Object Qboundp, Qfboundp; 49 Lisp_Object Qboundp, Qfboundp;
49 Lisp_Object Qcdr; 50 Lisp_Object Qcdr;
50 51
51 #ifdef LISP_FLOAT_TYPE 52 #ifdef LISP_FLOAT_TYPE
52 Lisp_Object Qfloatp; 53 Lisp_Object Qfloatp;
1857 Qsequencep = intern ("sequencep"); 1858 Qsequencep = intern ("sequencep");
1858 Qbufferp = intern ("bufferp"); 1859 Qbufferp = intern ("bufferp");
1859 Qvectorp = intern ("vectorp"); 1860 Qvectorp = intern ("vectorp");
1860 Qchar_or_string_p = intern ("char-or-string-p"); 1861 Qchar_or_string_p = intern ("char-or-string-p");
1861 Qmarkerp = intern ("markerp"); 1862 Qmarkerp = intern ("markerp");
1863 Qbuffer_or_string_p = intern ("buffer-or-string-p");
1862 Qinteger_or_marker_p = intern ("integer-or-marker-p"); 1864 Qinteger_or_marker_p = intern ("integer-or-marker-p");
1863 Qboundp = intern ("boundp"); 1865 Qboundp = intern ("boundp");
1864 Qfboundp = intern ("fboundp"); 1866 Qfboundp = intern ("fboundp");
1865 1867
1866 #ifdef LISP_FLOAT_TYPE 1868 #ifdef LISP_FLOAT_TYPE
1996 staticpro (&Qsequencep); 1998 staticpro (&Qsequencep);
1997 staticpro (&Qbufferp); 1999 staticpro (&Qbufferp);
1998 staticpro (&Qvectorp); 2000 staticpro (&Qvectorp);
1999 staticpro (&Qchar_or_string_p); 2001 staticpro (&Qchar_or_string_p);
2000 staticpro (&Qmarkerp); 2002 staticpro (&Qmarkerp);
2003 staticpro (&Qbuffer_or_string_p);
2001 staticpro (&Qinteger_or_marker_p); 2004 staticpro (&Qinteger_or_marker_p);
2002 #ifdef LISP_FLOAT_TYPE 2005 #ifdef LISP_FLOAT_TYPE
2003 staticpro (&Qfloatp); 2006 staticpro (&Qfloatp);
2004 staticpro (&Qnumberp); 2007 staticpro (&Qnumberp);
2005 staticpro (&Qnumber_or_marker_p); 2008 staticpro (&Qnumber_or_marker_p);