t_id
178
t_adddate
2003/10/03
t_result
200
t_knownrunerror
0
| tr_id | run | tr_ok | tr_skip | tr_result |
|---|---|---|---|---|
| 477559851 | 940437 | False | False | Failed to run |
Record count: 1
Unhandled trap: 0x28 pc: 00000000001001f0 npc: 00000000001001f4 %g0-3: 0000000000000000 000000000000003a 0000000000000000 0000000000000000 %g4-7: 0000000000000000 0000000000000000 0000000000000000 0000000000000000 %o0-3: 0000000000000000 0000000000000001 0000000000000000 0000000000000000 %o4-7: 0000000000000000 0000000000000000 00000040008005b1 00000000001001c4 %l0-3: 0000000000000000 0000000000000000 0000000000000000 0000000000000000 %l4-7: 0000000000000000 0000000000000000 0000000000000000 0000000000000000 %i0-3: 0000004000800f18 0000000000253470 0000004000800f28 0000000000000000 %i4-7: 0000000000000000 0000000000000000 0000004000800661 000000000010013c pstate: 00000092 ccr: 44 (icc: -Z-- xcc: -Z--) asi: 82 tl: 0 pil: 0 gl: 0 tbr: 0000000000000000 hpstate: 0000000000000000 htba: 0000000000000000 cansave: 6 canrestore: 0 otherwin: 0 wstate: 0 cleanwin: 7 cwp: 0 fsr: 0000000009000000 y: 0000000000000000 fprs: 0000000000000000
{ %RESULT=200 }
{****************************************************************}
{ CODE GENERATOR TEST PROGRAM }
{****************************************************************}
{ NODE TESTED : secondmoddiv() - division by zero test }
{****************************************************************}
{ PRE-REQUISITES: secondload() }
{ secondassign() }
{ secondtypeconv() }
{****************************************************************}
{ DEFINES: }
{ FPC = Target is FreePascal compiler }
{****************************************************************}
{ REMARKS: }
{ }
{ }
{ }
{****************************************************************}
{$ifdef VER70}
{$define TP}
{$endif}
var
cardinalres : cardinal;
cardinalcnt : cardinal;
int64res : int64;
int64cnt : int64;
begin
{ RIGHT : LOC_REFERENCE }
{ LEFT : LOC_REGISTER }
int64res := 1;
int64cnt := 0;
int64res := int64res div int64cnt;
end.
{
$Log: tdivz1.pp,v $
Revision 1.1 2002/09/21 13:28:06 carl
+ division by zero testing
}