1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-25 23:10:47 -08:00

(Fdocumentation): Use EMACS_INT.

This commit is contained in:
Richard M. Stallman 1994-09-17 00:29:03 +00:00
parent 81b328e5d1
commit f0f787b8b8

View file

@ -125,10 +125,10 @@ string is passed through `substitute-command-keys'.")
{
case Lisp_Subr:
if (XSUBR (fun)->doc == 0) return Qnil;
if ((int) XSUBR (fun)->doc >= 0)
if ((EMACS_INT) XSUBR (fun)->doc >= 0)
doc = build_string (XSUBR (fun)->doc);
else
doc = get_doc_string (- (int) XSUBR (fun)->doc);
doc = get_doc_string (- (EMACS_INT) XSUBR (fun)->doc);
break;
case Lisp_Compiled: