From: fred <fred> Date: Tue, 26 Mar 2002 21:49:20 +0000 (+0000) Subject: lilypond-1.1.41 X-Git-Tag: release/1.5.59~2465 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=a008cd1e9678343ff76d34af4c2455c56391b814;p=lilypond.git lilypond-1.1.41 --- diff --git a/flower/offset.cc b/flower/offset.cc index 258cc1782c..4e4e1e3bb0 100644 --- a/flower/offset.cc +++ b/flower/offset.cc @@ -25,6 +25,12 @@ Offset::str () const #endif +bool +isinf_b (Real r) +{ + return (fabs (r) > 1e20); +} + /* free bsd fix by John Galbraith */ @@ -33,7 +39,7 @@ Offset complex_multiply (Offset z1, Offset z2) { Offset z; - if(!isinf(z2[Y_AXIS])) + if(!isinf_b(z2[Y_AXIS])) { z[X_AXIS] = z1[X_AXIS] * z2[X_AXIS] - z1[Y_AXIS]*z2[Y_AXIS]; z[Y_AXIS] = z1[X_AXIS] * z2[Y_AXIS] + z1[Y_AXIS] * z2[X_AXIS];