[Groff-commit] groff ./ChangeLog src/preproc/pic/pic.y

[Werner LEMBERG]

CVSROOT:        /cvsroot/groff
Module name:    groff
Branch:         
Changes by:     Werner LEMBERG <address@hidden> 06/03/19 11:38:29

Modified files:
        .              : ChangeLog 
        src/preproc/pic: pic.y 

Log message:
        * src/preproc/pic/pic.y (expr <INT>): Really return integer part.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/groff/groff/ChangeLog.diff?tr1=1.932&tr2=1.933&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/groff/groff/src/preproc/pic/pic.y.diff?tr1=1.18&tr2=1.19&r1=text&r2=text

Patches:
Index: groff/ChangeLog
diff -u groff/ChangeLog:1.932 groff/ChangeLog:1.933
--- groff/ChangeLog:1.932       Sun Mar 19 09:13:43 2006
+++ groff/ChangeLog     Sun Mar 19 11:38:28 2006
@@ -1,3 +1,7 @@
+2006-03-19  Werner LEMBERG  <address@hidden>
+
+       * src/preproc/pic/pic.y (expr <INT>): Really return integer part.
+
 2006-03-19  Miklos Somogyi  <address@hidden>
 
        * doc/groff.texinfo: Improve documentation of `.sp'.
Index: groff/src/preproc/pic/pic.y
diff -u groff/src/preproc/pic/pic.y:1.18 groff/src/preproc/pic/pic.y:1.19
--- groff/src/preproc/pic/pic.y:1.18    Thu May 26 21:02:01 2005
+++ groff/src/preproc/pic/pic.y Sun Mar 19 11:38:29 2006
@@ -1,4 +1,5 @@
-/* Copyright (C) 1989, 1990, 1991, 1992, 2000, 2001, 2002, 2003, 2004, 2005
+/* Copyright (C) 1989, 1990, 1991, 1992, 2000, 2001, 2002, 2003, 2004, 2005,
+                 2006
    Free Software Foundation, Inc.
      Written by James Clark (address@hidden)
 
@@ -1604,7 +1605,7 @@
        | K_MIN '(' any_expr ',' any_expr ')'
                { $$ = $3 < $5 ? $3 : $5; }
        | INT '(' any_expr ')'
-               { $$ = floor($3); }
+               { $$ = $3 < 0 ? floor($3) + 1 : floor($3); }
        | RAND '(' any_expr ')'
                { $$ = 1.0 + floor(((rand()&0x7fff)/double(0x7fff))*$3); }
        | RAND '(' ')'