Commit f0f787b8 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(Fdocumentation): Use EMACS_INT.

parent 81b328e5
...@@ -125,10 +125,10 @@ string is passed through `substitute-command-keys'.") ...@@ -125,10 +125,10 @@ string is passed through `substitute-command-keys'.")
{ {
case Lisp_Subr: case Lisp_Subr:
if (XSUBR (fun)->doc == 0) return Qnil; 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); doc = build_string (XSUBR (fun)->doc);
else else
doc = get_doc_string (- (int) XSUBR (fun)->doc); doc = get_doc_string (- (EMACS_INT) XSUBR (fun)->doc);
break; break;
case Lisp_Compiled: case Lisp_Compiled:
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment