Преглед на файлове

human68k: cosmetics, no functional change

Karoly Balogh преди 1 година
родител
ревизия
70839bd7f4
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      rtl/human68k/system.pp

+ 1 - 1
rtl/human68k/system.pp

@@ -156,7 +156,7 @@ begin
   p:=@h68k_startup.comm^.buffer;
   p:=@h68k_startup.comm^.buffer;
   argl:=h68k_startup.comm^.len;
   argl:=h68k_startup.comm^.len;
 
 
-  args:=getmem(argl+1);
+  args:=GetMem(argl+1);
   if not assigned(args) then
   if not assigned(args) then
     exit;
     exit;
   fillchar(args^,argl+1,#0);
   fillchar(args^,argl+1,#0);