Changeset 14 for trunk/Compiler


Ignore:
Timestamp:
Nov 8, 2010, 12:58:47 PM (14 years ago)
Author:
george
Message:
  • Added: SINGLE_PRODUCER keyword for exclude other producers form compilation.
Location:
trunk/Compiler
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/Compiler/Produce/UProducers.pas

    r12 r14  
    77uses
    88  Classes, SysUtils,
    9   UProducerPascal,
    10   UProducerDynamicC,
     9  UProducerPascal
     10  {$IFNDEF SINGLE_PRODUCER}
     11  , UProducerDynamicC,
    1112  UProducerAsm8051,
    12   UProducerGCCC;
     13  UProducerGCCC
     14  {$ENDIF}
     15  ;
    1316
    1417procedure RegisterProducers(Compiler: TObject);
    … …  
    2326  with TCompiler(Compiler).Producers do begin
    2427    Add(TProducerPascal.Create);
     28    {$IFNDEF SINGLE_PRODUCER}
    2529    Add(TProducerDynamicC.Create);
    2630    Add(TProducerGCCC.Create);
    2731    Add(TProducerAsm8051.Create);
     32    {$ENDIF}
    2833  end;
    2934end;

  • trunk/Compiler/TranspascalCompiler.lpk

    r12 r14  
    1212      </SearchPaths>
    1313      <Other>
     14        <CustomOptions Value="-dSINGLE_PRODUCER"/>
    1415        <CompilerPath Value="$(CompPath)"/>
    1516      </Other>
Note: See TracChangeset for help on using the changeset viewer.