Mercurial > emacs
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; |