diff options
| author | k-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2014-11-22 23:21:19 +0000 |
|---|---|---|
| committer | k-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2014-11-22 23:21:19 +0000 |
| commit | fb174160559b9823a932fc238b55eb44619c47e8 (patch) | |
| tree | bd90bfc144adefb13d4bc21c78f879e84f293790 /src/base/USong.pas | |
| parent | adb65ab322d26b262f1988d24ee5cf800e07b4bf (diff) | |
| download | usdx-fb174160559b9823a932fc238b55eb44619c47e8.tar.gz usdx-fb174160559b9823a932fc238b55eb44619c47e8.tar.xz usdx-fb174160559b9823a932fc238b55eb44619c47e8.zip | |
Remove unused variables and fix warnings with ifdefed variables. Thanks to rudi_s.
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@3103 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'src/base/USong.pas')
| -rw-r--r-- | src/base/USong.pas | 5 |
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 |