ソースを参照

human68k: also fill the entire args buffer with zeros, for proper last argument termination

Karoly Balogh 2 年 前
コミット
5c93f3e271
1 ファイル変更1 行追加1 行削除
  1. 1 1
      rtl/human68k/system.pp

+ 1 - 1
rtl/human68k/system.pp

@@ -159,7 +159,7 @@ begin
     argl:=1;
     argl:=1;
 
 
   args:=getmem(argl+1);
   args:=getmem(argl+1);
-  fillchar(args^,argl,#0);
+  fillchar(args^,argl+1,#0);
   argsp:=args;
   argsp:=args;
 
 
   while p^ <> #0 do
   while p^ <> #0 do