From 65ba06b73c91c92a99f2ed88432e05a1b694531d Mon Sep 17 00:00:00 2001
From: tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Sun, 9 Mar 2008 18:48:19 +0000
Subject: Fixed some warnings ("missing result-values", "0 instead of nil",
 "comparison is always true", "range check errors")

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@946 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/Classes/USong.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Game/Code/Classes/USong.pas')

diff --git a/Game/Code/Classes/USong.pas b/Game/Code/Classes/USong.pas
index 65bd215a..940f2779 100644
--- a/Game/Code/Classes/USong.pas
+++ b/Game/Code/Classes/USong.pas
@@ -672,7 +672,7 @@ begin
   {$IFDEF FPC}
   setlength( BPM, 0 );
   {$ELSE}
-  BPM    := 0;
+  BPM    := nil;
   {$ENDIF}
 
   GAP    := 0;
-- 
cgit v1.2.3