Pas2JS 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
}