Test suite results for test file test/twide1.pp

Test run data :

Run ID:
Operating system: linux
Processor: mipsel
Version: 3.3.1
Fails/OK/Total: 187/9027/9214
Version: 3.3.1
Full version: 3.3.1-15596-gcde5b1a8c5-unpushed
Comment: -ao-xgot -fPIC -XR/home/muller/sys-root/mipsel-linux -Xd -Xr/home/muller/sys-root/mipsel-linux
Machine: cfarm13
Category: 1
SVN revisions: cde5b1a8c5:484dab553b:3f8bbd3b00:902c93f3c3
Submitter: muller
Date: 2024/04/22 11:22:00
Previous run: 936381
Next run: 937661

Hide skipped tests

Hide successful tests

Test file "test/twide1.pp" information:

t_id 1530
t_adddate 2005/03/18
t_result 0
t_knownrunerror 0

Detailed test run results:

tr_idruntr_oktr_skiptr_result
456309228937002FalseFalseFailed to run

Record count: 1

Log of 937002:

ok
ok
Runtime error 216 at $00477000
  $00477000
Runtime error 216 at $004477FC
  $004477FC
  $00445C30
  $00445D28
  $00445DF8
  $004466F4
  $2B2BDBAC
  $2B2F9398

Source:

{$ifdef unix}
uses
  cwstring;
{$endif unix}
  
var
  w : widestring;
  a : ansistring;
  
begin
  a:='A';
  w:=a;
  if w[1]<>#65 then
    halt(1);
  a:=w;
  if a[1]<>'A' then
    halt(1);
  writeln('ok');
end.

Link to SVN view of test/twide1.pp source.