From c89a8400cb7c3da1e61afd6ab93846eb9d0b8cda Mon Sep 17 00:00:00 2001
From: David Kastrup <dak@gnu.org>
Date: Fri, 6 Jul 2012 15:33:13 +0200
Subject: [PATCH] Eliminate gcc warning in ly_rational2scm

---
 lily/lily-guile.cc | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/lily/lily-guile.cc b/lily/lily-guile.cc
index 6ddcad079b..9806f14d24 100644
--- a/lily/lily-guile.cc
+++ b/lily/lily-guile.cc
@@ -581,10 +581,12 @@ SCM
 ly_rational2scm (Rational r)
 {
   if (r.is_infinity ())
-    if (r > Rational(0))
-      return scm_inf ();
-    else
+    {
+      if (r > Rational(0))
+	return scm_inf ();
+
       return scm_difference (scm_inf (), SCM_UNDEFINED);
+    }
 
   return scm_divide (scm_from_int64 (r.numerator ()),
                      scm_from_int64 (r.denominator ()));
-- 
2.39.5