27 function pfsBlockRead(f: PFSFile; buf: pointer; size: Int64): Int64;

    27 function pfsBlockRead(f: PFSFile; buf: pointer; size: Int64): Int64;

    28 function pfsEOF(f: PFSFile): boolean;

    28 function pfsEOF(f: PFSFile): boolean;

    29 

    29 

    30 function pfsExists(fname: shortstring): boolean;

    30 function pfsExists(fname: shortstring): boolean;

    31 

    31 

    33 function  physfsReader(L: Plua_State; f: PFSFile; sz: Psize_t) : PChar; cdecl; external PhyslayerLibName;

    33 function  physfsReader(L: Plua_State; f: PFSFile; sz: Psize_t) : PChar; cdecl; external PhyslayerLibName;

    34 procedure physfsReaderSetBuffer(buf: pointer); cdecl; external PhyslayerLibName;

    34 procedure physfsReaderSetBuffer(buf: pointer); cdecl; external PhyslayerLibName;

    35 procedure hedgewarsMountPackage(filename: PChar); cdecl; external PhyslayerLibName;

    35 procedure hedgewarsMountPackage(filename: PChar); cdecl; external PhyslayerLibName;

    37 

    37 

    38 implementation

    38 implementation

    39 uses uUtils, uVariables;

    39 uses uUtils, uVariables;

    40 

    40 

    41 {$IFNDEF PAS2C}

    41 {$IFNDEF PAS2C}