diff -r ca67740f19b2 -r 8572d1f8b2f0 hedgewars/uPhysFSLayer.pas --- a/hedgewars/uPhysFSLayer.pas Sun Jan 26 10:20:42 2014 +0400 +++ b/hedgewars/uPhysFSLayer.pas Mon Jan 27 00:33:42 2014 +0400 @@ -31,13 +31,16 @@ function pfsExists(fname: shortstring): boolean; +{$IFNDEF PAS2C} function physfsReader(L: Plua_State; f: PFSFile; sz: Psize_t) : PChar; cdecl; external PhyslayerLibName; procedure physfsReaderSetBuffer(buf: pointer); cdecl; external PhyslayerLibName; procedure hedgewarsMountPackage(filename: PChar); cdecl; external PhyslayerLibName; +{$ENDIF} implementation uses uUtils, uVariables, sysutils; +{$IFNDEF PAS2C} function PHYSFS_init(argv0: PChar) : LongInt; cdecl; external PhysfsLibName; function PHYSFS_deinit() : LongInt; cdecl; external PhysfsLibName; function PHYSFSRWOPS_openRead(fname: PChar): PSDL_RWops; cdecl; external PhyslayerLibName; @@ -52,6 +55,7 @@ function PHYSFS_getLastError(): PChar; cdecl; external PhysfsLibName; procedure hedgewarsMountPackages(); cdecl; external PhyslayerLibName; +{$ENDIF} function rwopsOpenRead(fname: shortstring): PSDL_RWops; begin