{$J-,H+,T-P+,X+,B-,V-,O+,A+,W-,U-,R-,I-,Q-,D-,L-,Y-,C-}
library SimpleFeedbackCompressor;

uses
  FastMM4,
  Forms,
  DVSTEffect,
  DVSTModule,
  SimpleFeedbackCompressorDM in 'SimpleFeedbackCompressorDM.pas' {SimpleFeedbackCompressorDataModule: TVSTModule},
  EditorFrm in 'EditorFrm.pas' {EditorForm};

function main(audioMaster: TAudioMasterCallbackFunc): PVSTEffect; cdecl; export;
var
  SimpleFeedbackCompressorDataModule: TSimpleFeedbackCompressorDataModule;
begin
  try
    SimpleFeedbackCompressorDataModule := TSimpleFeedbackCompressorDataModule.Create(Application);
    SimpleFeedbackCompressorDataModule.AudioMaster := audioMaster;
    with SimpleFeedbackCompressorDataModule do
    begin
      Effect^.user := SimpleFeedbackCompressorDataModule;
      Result := Effect;
    end;
  except
    Result := nil;
  end;
end;

exports Main name 'main';
exports Main name 'VSTPluginMain';

begin
end.
