hedgewars/uLandPainted.pas
changeset 7110 c91d33837b0d
parent 7043 7c080e5ac8d0
child 7147 11b7b12e2b85
equal deleted inserted replaced
7020:846cea23aea2 7110:c91d33837b0d
   128         prec:= @s[i];
   128         prec:= @s[i];
   129         rec:= prec^;
   129         rec:= prec^;
   130         rec.X:= SDLNet_Read16(@rec.X);
   130         rec.X:= SDLNet_Read16(@rec.X);
   131         rec.Y:= SDLNet_Read16(@rec.Y);
   131         rec.Y:= SDLNet_Read16(@rec.Y);
   132 
   132 
   133         pe:= new(PPointEntry);
   133         new(pe);
   134         if pointsListLast = nil then
   134         if pointsListLast = nil then
   135             pointsListHead:= pe
   135             pointsListHead:= pe
   136         else
   136         else
   137             pointsListLast^.next:= pe;
   137             pointsListLast^.next:= pe;
   138         pointsListLast:= pe;
   138         pointsListLast:= pe;