lilypond-0.0.20

diff --git a/src/parser.y b/src/parser.y
index bc38c27e1489538a63b9d5db495dd315dbe5b31d..402bc95f74dbe75077cb61a982291f33d0386b2d 100644 (file)
--- a/src/parser.y
+++ b/src/parser.y
@@ -437,7 +437,7 @@ pitch_list:                 {
 int:
        REAL                    {
                $$ = int($1);
-               if (ABS($1-Real(int($$))) > 1e-8)
+               if ( distance($1,Real(int($$)) ) > 1e-8)
                        error("expecting integer number");
        }
        | INT