hedgewars/uPhysFSLayer.pas
branchwebgl
changeset 9127 e350500c4edb
parent 8839 caa57115d7ea
parent 9111 f529fba57ba5
child 9236 ddd675825672
equal deleted inserted replaced
8860:bde641cf53c8 9127:e350500c4edb
     7 const PhyslayerLibName = 'libphyslayer';
     7 const PhyslayerLibName = 'libphyslayer';
     8 
     8 
     9 {$IFNDEF WIN32}
     9 {$IFNDEF WIN32}
    10     {$linklib physfs}
    10     {$linklib physfs}
    11     {$linklib physlayer}
    11     {$linklib physlayer}
       
    12 
       
    13     {statically linking physfs brings IOKit dependency on OSX}
    12     {$IFDEF DARWIN}
    14     {$IFDEF DARWIN}
    13         {$linkframework IOKit}
    15         {$linkframework IOKit}
    14     {$ENDIF}
    16     {$ENDIF}
    15 {$ENDIF}
    17 {$ENDIF}
    16 
    18 
    32 
    34 
    33 function pfsExists(fname: shortstring): boolean;
    35 function pfsExists(fname: shortstring): boolean;
    34 
    36 
    35 function  physfsReader(L: Plua_State; f: PFSFile; sz: Psize_t) : PChar; cdecl; external PhyslayerLibName;
    37 function  physfsReader(L: Plua_State; f: PFSFile; sz: Psize_t) : PChar; cdecl; external PhyslayerLibName;
    36 procedure physfsReaderSetBuffer(buf: pointer); cdecl; external PhyslayerLibName;
    38 procedure physfsReaderSetBuffer(buf: pointer); cdecl; external PhyslayerLibName;
       
    39 procedure hedgewarsMountPackage(filename: PChar); cdecl; external PhyslayerLibName;
    37 
    40 
    38 {$IFNDEF PAS2C}
    41 {$IFNDEF PAS2C}
    39 //apparently pas2c doesn't render the functions below if it finds 'implementation' first
    42 //apparently pas2c doesn't render the functions below if it finds 'implementation' first
    40 implementation
    43 implementation
    41 uses uUtils, uVariables, sysutils;
    44 uses uUtils, uVariables, sysutils;