[Emacs-diffs] Changes to emacs/src/floatfns.c

[Stefan Monnier]

Index: emacs/src/floatfns.c
diff -c emacs/src/floatfns.c:1.80 emacs/src/floatfns.c:1.81
*** emacs/src/floatfns.c:1.80   Mon Sep  1 11:45:52 2003
--- emacs/src/floatfns.c        Wed Nov  5 11:45:11 2003
***************
*** 1,5 ****
  /* Primitive operations on floating point for GNU Emacs Lisp interpreter.
!    Copyright (C) 1988, 1993, 1994, 1999 Free Software Foundation, Inc.
  
  This file is part of GNU Emacs.
  
--- 1,5 ----
  /* Primitive operations on floating point for GNU Emacs Lisp interpreter.
!    Copyright (C) 1988, 1993, 1994, 1999, 2003  Free Software Foundation, Inc.
  
  This file is part of GNU Emacs.
  
***************
*** 692,698 ****
    double f = extract_float (arg);
  
    if (f == 0.0)
!     value = -(VALMASK >> 1);
    else
      {
  #ifdef HAVE_LOGB
--- 692,698 ----
    double f = extract_float (arg);
  
    if (f == 0.0)
!     value = MOST_NEGATIVE_FIXNUM;
    else
      {
  #ifdef HAVE_LOGB