comparison src/doc.c @ 8823:fdb7ba55f05c

(Fdocumentation): Use EMACS_INT.
author Richard M. Stallman <rms@gnu.org>
date Sat, 17 Sep 1994 00:29:03 +0000
parents 1353c008cf8e
children e3c272c7f4d2
comparison
equal deleted inserted replaced
8822:33a3f424c8c3 8823:fdb7ba55f05c
123 123
124 switch (XTYPE (fun)) 124 switch (XTYPE (fun))
125 { 125 {
126 case Lisp_Subr: 126 case Lisp_Subr:
127 if (XSUBR (fun)->doc == 0) return Qnil; 127 if (XSUBR (fun)->doc == 0) return Qnil;
128 if ((int) XSUBR (fun)->doc >= 0) 128 if ((EMACS_INT) XSUBR (fun)->doc >= 0)
129 doc = build_string (XSUBR (fun)->doc); 129 doc = build_string (XSUBR (fun)->doc);
130 else 130 else
131 doc = get_doc_string (- (int) XSUBR (fun)->doc); 131 doc = get_doc_string (- (EMACS_INT) XSUBR (fun)->doc);
132 break; 132 break;
133 133
134 case Lisp_Compiled: 134 case Lisp_Compiled:
135 if (XVECTOR (fun)->size <= COMPILED_DOC_STRING) 135 if (XVECTOR (fun)->size <= COMPILED_DOC_STRING)
136 return Qnil; 136 return Qnil;