X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_console.pas;h=fb0b9eb66abf0a78e6ec32ff519ab0c350426463;hb=5368f6638623f763633157cdd4920bf2cb66fce5;hp=9e6f4d5de4776bd505e2499b4a384cfff3a6862a;hpb=cd1ca85acc0740e0f307782e2af54e5ba0a59507;p=d2df-sdl.git

diff --git a/src/game/g_console.pas b/src/game/g_console.pas
index 9e6f4d5..fb0b9eb 100644
--- a/src/game/g_console.pas
+++ b/src/game/g_console.pas
@@ -265,7 +265,7 @@ var
   cp: PCommand;
   pv: PVarSingle;
 begin
-  GetMem(pv, sizeof(pv^));
+  GetMem(pv, sizeof(TVarSingle));
   pv.val := pvar;
   pv.min := amin;
   pv.max := amax;