Test suite results for test file webtbs/tw1634.pp

Test run data :

Run ID:
Operating system: go32v2
Processor: i386
Version: 3.3.1
Fails/OK/Total: 70/9354/9424
Version: 3.3.1
Full version: 3.3.1-15628-gefb9757549-unpushed
Comment: -O- -Fl/home/muller/sys-root/djgpp/lib -Fl/home/muller/sys-root/djgpp/lib/gcc/djgpp/6.10 -Fd
Machine: cfarm26
Category: 1
SVN revisions: e601156b8c:3cfec5e6a4:7629cdb4a5:efb9757549
Submitter: pierre
Date: 2024/04/28 05:55:00
Previous run: 940283
Next run: 941767

Hide skipped tests

Hide successful tests

Test file "webtbs/tw1634.pp" information:

t_id 835
t_adddate 2003/10/03
t_result 0
t_knownrunerror 0

Detailed test run results:

tr_idruntr_oktr_skiptr_result
481274840941031TrueFalseSuccessfully run

Record count: 1

No log of 941031.

Source: 

{ Source provided for Free Pascal Bug Report 1634 }
{ Submitted by "Igor Grigoriev" on  2001-10-06 }
{ e-mail: igor@sch57.msk.ru }
{$DEFINE A}
program test;

{$IFNDEF A}
  procedure p1;
  begin
   (*{$IFDEF B}  {$ENDIF}*)
  end;
{$ENDIF}

BEGIN
END.

// The above program gives error:
// test.pas(13) Fatal: Unexpected end of file
// But comment line changed to:
// (* {$IFDEF B}  {$ENDIF}*)
//   ( space after '(*' added )
//gives successful compilation.

Link to SVN view of webtbs/tw1634.pp source.