|
@@ -252,15 +252,22 @@ loop on input bytes:
|
|
convert samples to integer and queue to soundcard
|
|
convert samples to integer and queue to soundcard
|
|
}
|
|
}
|
|
|
|
|
|
|
|
+{$IFNDEF FPC_DOTTEDUNITS}
|
|
unit dts;
|
|
unit dts;
|
|
|
|
+{$ENDIF FPC_DOTTEDUNITS}
|
|
|
|
|
|
{$mode objfpc}
|
|
{$mode objfpc}
|
|
{$MINENUMSIZE 4}
|
|
{$MINENUMSIZE 4}
|
|
|
|
|
|
interface
|
|
interface
|
|
|
|
|
|
|
|
+{$IFDEF FPC_DOTTEDUNITS}
|
|
|
|
+uses
|
|
|
|
+ System.CTypes;
|
|
|
|
+{$ELSE FPC_DOTTEDUNITS}
|
|
uses
|
|
uses
|
|
ctypes;
|
|
ctypes;
|
|
|
|
+{$ENDIF FPC_DOTTEDUNITS}
|
|
|
|
|
|
{$UNDEF LIBA52_DOUBLE}
|
|
{$UNDEF LIBA52_DOUBLE}
|
|
|
|
|