From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 17 Sep 1994 00:29:03 +0000 (+0000)
Subject: (Fdocumentation): Use EMACS_INT.
X-Git-Tag: emacs-19.34~7031
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f0f787b8b8b2dc42e4331aa082fbc91aaeec9271;p=emacs.git

(Fdocumentation): Use EMACS_INT.
---

diff --git a/src/doc.c b/src/doc.c
index ae6f77ba7e7..f8e1fd651d9 100644
--- a/src/doc.c
+++ b/src/doc.c
@@ -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: