From a2502d7c5352d4dd8e8d1be8a90f5b621e32d617 Mon Sep 17 00:00:00 2001
From: David Kastrup <dak@gnu.org>
Date: Sat, 23 Jun 2012 10:41:23 +0200
Subject: [PATCH] Issue 2620: (ly:pitch<? #{ des #} #{ d #}) => #t

---
 lily/pitch.cc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lily/pitch.cc b/lily/pitch.cc
index dd82af2f63..b26076a008 100644
--- a/lily/pitch.cc
+++ b/lily/pitch.cc
@@ -57,7 +57,7 @@ Pitch::compare (Pitch const &m1, Pitch const &m2)
   if (n)
     return n;
   if (a)
-    return a > (Rational)0;
+    return a > (Rational)0 ? 1 : -1;
 
   return 0;
 }
-- 
2.39.5