Test suite results for test file webtbs/tw3073.pp

Test run data :

Free Pascal Compiler Test Suite Results

View Test suite results

Please specify search criteria:
File:
Operating system:
Processor:
Version
Date
Submitter
Machine
Comment
Limit
Cond
Category
Only failed tests
Hide skipped tests
List all tests

Test file "webtbs/tw3073.pp" information:

t_id 1292
t_adddate 2004/05/21
t_result 0
t_knownrunerror 0

Detailed test run results:

Record count: 50

Total = 50

OK=50 Percentage= 100.00

Result type Cat. Count Percentage First date Last Date
Successfully run 50 100.0 2024/05/21 01:22:00 34 2024/05/21 03:21:00 19
i386 10 20.0 2024/05/21 01:22:00 34 2024/05/21 03:02:00 25
x86_64 35 70.0 2024/05/21 01:33:00 15 2024/05/21 03:21:00 19
aarch64 5 10.0 2024/05/21 01:42:00 32 2024/05/21 03:08:00 37
linux 44 88.0 2024/05/21 01:22:00 34 2024/05/21 03:20:00 18
win32 1 2.0 2024/05/21 03:02:00 25 2024/05/21 03:02:00 25
solaris 5 10.0 2024/05/21 03:08:00 30 2024/05/21 03:21:00 19
3.3.1 32 64.0 2024/05/21 01:33:00 15 2024/05/21 03:21:00 19
3.2.3 18 36.0 2024/05/21 01:22:00 34 2024/05/21 03:19:00 27

Source:

{ Source provided for Free Pascal Bug Report 3073 }
{ Submitted by "Martin Schreiber" on  2004-04-30 }
{ e-mail:  }
program project1;

 {$mode objfpc}{$H+}

uses
 Classes;
var
 po1,po2: pwidechar;
begin
 po1:= 'abc';
 po2:= po1+1;
 if po2-po1<>1 then
   halt(1);
 if pwidechar(24)-pwidechar(22)<>1 then
  halt(1);
end.

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