anchor.diff:  
   uses
     {$I SynDprUses.inc} // enable FastMM4 prior to Delphi 2006, and enable FPC on Linux
  +  SysUtils,
     SynCommons,
     mORMot,
     mORMotHttpServer,
  
positive.code:   Writeln('');
    Writeln('Press [Enter] to close the server.');
    ReadLn;
  end.
  
negative.code:   AutoModel, AutoServer, AutoHTTPServer: IAutoFree;
  begin
    AutoModel := TAutoFree.One(Model, TSQLModel.Create([]));
    AutoServer := TAutoFree.One(Server, TSQLRestServerFullMemory.Create(Model));
    AutoHTTPServer := TAutoFree.One(HTTPServer, TBoilerplateHTTPServer.Create(
      '8092', Server, '+', HTTP_DEFAULT_MODE, 32, secNone, '/'));
  
  