aboutsummaryrefslogtreecommitdiffstats
path: root/src/base/USong.pas
diff options
context:
space:
mode:
Diffstat (limited to 'src/base/USong.pas')
-rw-r--r--src/base/USong.pas5
1 files changed, 0 insertions, 5 deletions
diff --git a/src/base/USong.pas b/src/base/USong.pas
index a8581ebd..bff39a29 100644
--- a/src/base/USong.pas
+++ b/src/base/USong.pas
@@ -283,8 +283,6 @@ end;
function TSong.FindSongFile(Dir: IPath; Mask: UTF8String): IPath;
var
Iter: IFileIterator;
- FileInfo: TFileInfo;
- FileName: IPath;
begin
Iter := FileSystem.FileFind(Dir.Append(Mask), faDirectory);
if (Iter.HasNext) then
@@ -638,7 +636,6 @@ var
Param3: integer;
ParamS: string;
I, J: integer;
- NoteIndex: integer;
NoteType: char;
SentenceEnd, Rest, Time: integer;
@@ -1264,8 +1261,6 @@ begin
end;
procedure TSong.NewSentence(LineNumberP: integer; Param1, Param2: integer);
-var
- I: integer;
begin
if (Lines[LineNumberP].Line[Lines[LineNumberP].High].HighNote <> -1) then