# HG changeset patch
# User Lute Kamstra <lute@gnu.org>
# Date 1110985217 0
# Node ID de22fdff5bada1a917ecbd88c8bea7b1a29c7116
# Parent  5294e5833aef48be1a5f9f86371f6e44c24b21be
(Ffloor): Doc fix.

diff -r 5294e5833aef -r de22fdff5bad src/floatfns.c
--- a/src/floatfns.c	Wed Mar 16 13:23:55 2005 +0000
+++ b/src/floatfns.c	Wed Mar 16 15:00:17 2005 +0000
@@ -1,5 +1,5 @@
 /* Primitive operations on floating point for GNU Emacs Lisp interpreter.
-   Copyright (C) 1988, 1993, 1994, 1999, 2003  Free Software Foundation, Inc.
+   Copyright (C) 1988, 1993, 1994, 1999, 2003, 2005  Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
 
@@ -861,7 +861,7 @@
 
 DEFUN ("floor", Ffloor, Sfloor, 1, 2, 0,
        doc: /* Return the largest integer no greater than ARG.
-This rounds the value towards +inf.
+This rounds the value towards -inf.
 With optional DIVISOR, return the largest integer no greater than ARG/DIVISOR.  */)
      (arg, divisor)
      Lisp_Object arg, divisor;