Browse Source

* initialise local variable to prevent random failures

git-svn-id: trunk@42992 -
Jonas Maebe 5 years ago
parent
commit
9b70c7623d
1 changed files with 1 additions and 0 deletions
  1. 1 0
      tests/tbs/tb0068.pp

+ 1 - 0
tests/tbs/tb0068.pp

@@ -17,6 +17,7 @@ function SetupScanLines(va,vb,vc:word):single;
 var dx3d,dx2d,dy2d,dz,ex3d,ex2d,ez:longint;
 var dx3d,dx2d,dy2d,dz,ex3d,ex2d,ez:longint;
     r:single;
     r:single;
 begin
 begin
+ dy2d := 0;
  dy2d := Vtx2d[vb].y;
  dy2d := Vtx2d[vb].y;
  r    := (dy2d-Vtx2d[va].y);     {this line causes error!!!!!!!!!!!!!!!!!!!}
  r    := (dy2d-Vtx2d[va].y);     {this line causes error!!!!!!!!!!!!!!!!!!!}
 end;
 end;