# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 779761743 0
# Node ID fdb7ba55f05c025b586496bac8f926483739f080
# Parent  33a3f424c8c3b4f9c3b73126489372bf4a7b3f51
(Fdocumentation): Use EMACS_INT.

diff -r 33a3f424c8c3 -r fdb7ba55f05c src/doc.c
--- a/src/doc.c	Sat Sep 17 00:28:47 1994 +0000
+++ b/src/doc.c	Sat Sep 17 00:29:03 1994 +0000
@@ -125,10 +125,10 @@
     {
     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: