hedgewars/uLandPainted.pas
changeset 7043 7c080e5ac8d0
parent 6898 344b0dbd9690
child 7147 11b7b12e2b85
equal deleted inserted replaced
7042:de20086a6bcc 7043:7c080e5ac8d0
   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;