diff options
| author | jaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-09-24 13:31:43 +0000 |
|---|---|---|
| committer | jaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-09-24 13:31:43 +0000 |
| commit | 739ad9a6dee57375f05dcd20dc59ba2d619f11fa (patch) | |
| tree | fb82b095cd5dca1bb06aaca59e1936008fac3490 /Game/Code/Classes/USingScores.pas | |
| parent | 1f9fd791bbe68741b8273a64eb5c0abe928e431c (diff) | |
| download | usdx-739ad9a6dee57375f05dcd20dc59ba2d619f11fa.tar.gz usdx-739ad9a6dee57375f05dcd20dc59ba2d619f11fa.tar.xz usdx-739ad9a6dee57375f05dcd20dc59ba2d619f11fa.zip | |
fixed song loading in Lazarus..
cant assume variables are initialized as 0 :)
in UFile "Done: byte;" was no initialized on lazarus compiler.
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@431 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
| -rw-r--r-- | Game/Code/Classes/USingScores.pas | 16 |
1 files changed, 14 insertions, 2 deletions
diff --git a/Game/Code/Classes/USingScores.pas b/Game/Code/Classes/USingScores.pas index 27a65b32..881a5515 100644 --- a/Game/Code/Classes/USingScores.pas +++ b/Game/Code/Classes/USingScores.pas @@ -1,7 +1,14 @@ unit USingScores;
interface
-uses UThemes, OpenGl12, UTexture;
+
+{$IFDEF FPC}
+ {$MODE Delphi}
+{$ENDIF}
+
+uses UThemes,
+ OpenGl12,
+ UTexture;
//Some Constances containing Options that could change by time
const
@@ -158,7 +165,12 @@ type implementation
-uses SDL, SysUtils, ULog, UGraphic, TextGL;
+
+uses SDL,
+ SysUtils,
+ ULog,
+ UGraphic,
+ TextGL;
//-----------
//Constructor just sets some standard Settings
|