[Emacs-diffs] /srv/bzr/emacs/trunk r102390: * src/data.c (sign_extend_temp, sign_extend_lisp_int): Remove, unused.

[Dan Nicolaescu]

------------------------------------------------------------
revno: 102390
committer: Dan Nicolaescu <address@hidden>
branch nick: trunk
timestamp: Sun 2010-11-14 21:52:58 -0800
message:
  * src/data.c (sign_extend_temp, sign_extend_lisp_int): Remove, unused.
modified:
  src/ChangeLog
  src/data.c

=== modified file 'src/ChangeLog'
--- a/src/ChangeLog     2010-11-14 19:58:24 +0000
+++ b/src/ChangeLog     2010-11-15 05:52:58 +0000
@@ -1,3 +1,7 @@
+2010-11-15  Dan Nicolaescu  <address@hidden>
+
+       * data.c (sign_extend_temp, sign_extend_lisp_int): Remove, unused.
+
 2010-11-14  Chong Yidong  <address@hidden>
 
        * w32fns.c (Fx_create_frame):

=== modified file 'src/data.c'
--- a/src/data.c        2010-09-24 17:48:10 +0000
+++ b/src/data.c        2010-11-15 05:52:58 +0000
@@ -135,21 +135,6 @@
   xsignal3 (Qargs_out_of_range, a1, a2, a3);
 }
 
-/* On some machines, XINT needs a temporary location.
-   Here it is, in case it is needed.  */
-
-int sign_extend_temp;
-
-/* On a few machines, XINT can only be done by calling this.  */
-
-int
-sign_extend_lisp_int (EMACS_INT num)
-{
-  if (num & (((EMACS_INT) 1) << (VALBITS - 1)))
-    return num | (((EMACS_INT) (-1)) << VALBITS);
-  else
-    return num & ((((EMACS_INT) 1) << VALBITS) - 1);
-}
 
 /* Data type predicates */