www.pudn.com > lzss.rar > LZDEFINE.INC

{\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\} 
{ ////// CONDITIONAL COMPILATION DIRECTIVES FOR CHIEFLZ //////} 
{\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\} 
 
 
{\\\\\\\\\\\ release or debug mode?  \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\} 
{\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\} 
{ Conditional compilation to check for any `impossible' scenarios... 
  Remove for release code. } 
 
{$DEFINE Debug} 
 
 
{$IFDEF Debug} 
  {$D+,L+,Q+,R+,S+,Y+} 
{$ELSE} 
  {$Q-,R-,S-} 
{$ENDIF} 
 
{\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\} 
{\\\\\\\\\\\\\\\ DLL or static link?  \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\} 
 
{.$DEFINE aDLL}  { Remove dot to create a Windows/DPMI DLL } 
 
{\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\} 
{\\\\\\\\\\\\\\\ DOS DPMI program?   \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\} 
 
{$ifdef DPMI} 
 {$ifdef aDLL} 
   {$define Windows} {use Windows data types for DOS DPMI DLL} 
 {$Endif aDLL} 
{$endif DPMI} 
 
{\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\} 
{\\\\\\\\\\\\\\\ Win32 or other platform ?\\\\\\\\\\\\\\\\\\\\\\\\\\\\\} 
 
{$ifdef Win32} 
  {$B-}  { Use short-circuit logic } 
  {$H+}  { Use long strings        } 
  {$I+}  { IO-errors as exceptions } 
  {$J-}  { Non-assignable const variables. } 
  {$Z1}  { Byte-sized enumerated types } 
  {$Define Delphi} 
  {$Define Windows} 
  {$IFDEF Debug} 
    {$W+}           { <<< Stack frames in Debug Code } 
    {$WARNINGS On}  { <<< Force compiler to use bacon-saving options } 
    {$HINTS On} 
  {$ENDIF} 
{$else Win32} 
  {$B-}  { Use short-circuit logic } 
  {$F+)  { Use FAR-calls. This is *essential* in DEBUG code } 
  {$I-}  { IO-Error handling performed manually } 
  {$ifdef Windows} 
    {$define Win16} 
  {$endif Windows} 
{$endif Win32} 
 
 
{\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\} 
{\\\\\\\\\\\\\\\ Delphi 1.0?         \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\} 
 
{$ifDef Ver80} 
  {$Z-}  { Byte-sized enumerated types } 
  {$Define Delphi} 
{$endif Ver80} 
 
{\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\} 
{\\\\\\\\\\\\\\\ Windows or like platform ?\\\\\\\\\\\\\\\\\\\\\\\\\\\\} 
 
{$ifdef Windows} 
{$ifndef Delphi} 
  {$define TPW} 
{$endif Delphi} 
{$endif Windows}