# HG changeset patch
# User unc0rr
# Date 1394791179 -14400
# Node ID 514e338f2eaff2aaeb6b4a2c7a7552874c91b486
# Parent  d1c23bb7334675ba9db715e598617fb7c6c57f14
Fix perlin gen on 32 bit arch

diff -r d1c23bb73346 -r 514e338f2eaf hedgewars/uLandGenPerlin.pas
--- a/hedgewars/uLandGenPerlin.pas	Fri Mar 14 00:42:04 2014 +0400
+++ b/hedgewars/uLandGenPerlin.pas	Fri Mar 14 13:59:39 2014 +0400
@@ -54,7 +54,7 @@
 
 function lerp(t, a, b: LongInt) : LongInt; inline;
 begin
-    lerp:= a + (t * (b - a) shr 12)
+    lerp:= a + (Int64(b - a) * t shr 12)
 end;