fix build problem for me local...

hope it fixes builds on dev.usdx


git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@951 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 4 insertions, 5 deletions

diff --git a/Game/Code/Classes/UAudioInput_Portaudio.pas b/Game/Code/Classes/UAudioInput_Portaudio.pas
index f055c9d6..2883ccb0 100644
--- a/Game/Code/Classes/UAudioInput_Portaudio.pas
+++ b/Game/Code/Classes/UAudioInput_Portaudio.pas
@@ -3,7 +3,6 @@ unit UAudioInput_Portaudio;
 interface
 
 {$IFDEF FPC}
-{$IFDEF FPC}
   {$MODE Delphi}
 {$ENDIF}
 
@@ -137,10 +136,7 @@ var
   paApiInfo:   PPaHostApiInfo;
   deviceName:  string;
   deviceIndex: TPaDeviceIndex;
-  //deviceInfo:  PPaDeviceInfo;
-  //sourceCnt:   integer;
-  sourceIndex: integer;
-  //sourceName:  string;
+  deviceInfo:  PPaDeviceInfo;
   channelCnt:  integer;
   SC:          integer; // soundcard
   err:         TPaError;
@@ -152,7 +148,10 @@ var
   sampleRate:  integer;
   latency:     TPaTime;
   {$IFDEF UsePortmixer}
+  sourceIndex: integer;
   mixer:       PPxMixer;
+  sourceCnt:   integer;
+  sourceName:  string;
   {$ENDIF}
   cbPolls: integer;
   cbWorks: boolean;