Mercurial > emacs

changeset 48097:21d7f2c18976

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fformat_network_address): Fix int/Lisp_Object mixup.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Thu, 31 Oct 2002 16:21:38 +0000
parents 75bdf0931b4c
children 9928508424ca
files src/process.c
diffstat 1 files changed, 6 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/src/process.c	Thu Oct 31 00:42:35 2002 +0000
+++ b/src/process.c	Thu Oct 31 16:21:38 2002 +0000
@@ -1078,11 +1078,11 @@
 	return Qnil;
 
       args[0] = build_string ("%d.%d.%d.%d:%d");
-      args[1] = XINT (p->contents[0]);
-      args[2] = XINT (p->contents[1]);
-      args[3] = XINT (p->contents[2]);
-      args[4] = XINT (p->contents[3]);
-      args[5] = XINT (p->contents[4]);
+      args[1] = p->contents[0];
+      args[2] = p->contents[1];
+      args[3] = p->contents[2];
+      args[4] = p->contents[3];
+      args[5] = p->contents[4];
       return Fformat (6, args);
     }
 
@@ -1090,7 +1090,7 @@
     {
       Lisp_Object args[2];
       args[0] = build_string ("<Family %d>");
-      args[1] = XINT (Fcar (address));
+      args[1] = Fcar (address);
       return Fformat (2, args);
       
     }