diff --git a/src/sfs/sfsMemFS.pas b/src/sfs/sfsMemFS.pas
index 03c8be287c7890367062e86b45b5b10148670e61..edf35c0bed806ba75c26a1ced966930894b9daf2 100644 (file)
--- a/src/sfs/sfsMemFS.pas
+++ b/src/sfs/sfsMemFS.pas
// as a side effect this gives us an opportunity to read enclosed packs
// from the packs which aren't supporting backseeking (such as zips).
//
+{.$DEFINE SFS_MSMFS}
{$MODE DELPHI}
{.$R-}
unit sfsMemFS;
interface
+{$IFDEF SFS_MSMFS}
uses
SysUtils, Classes, Contnrs, sfs;
function Produce (const prefix, fileName: TSFSString; st: TStream): TSFSVolume; override;
procedure Recycle (vol: TSFSVolume); override;
end;
-
+{$ENDIF}
implementation
+{$IFDEF SFS_MSMFS}
uses
xstreams;
SFSRegisterVolumeFactory(memf);
finalization
SFSUnregisterVolumeFactory(memf);
+{$ENDIF}
end.