Conditionals using $ELSE

Smart pascal source code


// -----> SIMPLE CONDITIONAL <-------
{$IFDEF TEST}
WriteLn('Bug 1');
{$ENDIF junk}

{$IFNDEF TEST}
WriteLn('Hello');
{$ENDIF}

{$Define TEST}

{$IFDEF TEST}
WriteLn('World');
{$ENDIF}

{$IFNDEF TEST}
WriteLn('Bug 2');
{$ENDIF}

{$undef TEST}

{$IFDEF TEST}
WriteLn('Bug 3');
{$ENDIF}

{$IFNDEF TEST}
WriteLn('!');
{$ENDIF}
{ <<<<<<<<<<<< CONSOLE OUTPUTS >>>>>>>>>>>>>>>>>>>
  Hello
  World
!
}
// -----> CONDITIONAL ELSE <-------

{$IFDEF TEST}
WriteLn('Bug 1');
{$ELSE}
WriteLn('Hello');
{$ENDIF}

{$Define test}

{$ifdef TEST}
WriteLn('World');
{$else}
WriteLn('Bug 2');
{$endif}
{ <<<<<<<<<<<< CONSOLE OUTPUTS >>>>>>>>>>>>>>>>>>>
  Hello
  World
}