Selaa lähdekoodia

Fix compilation of syscall unit for i386-beos target

Pierre Muller 1 vuosi sitten
vanhempi
commit
b1e1a107d3
1 muutettua tiedostoa jossa 2 lisäystä ja 2 poistoa
  1. 2 2
      rtl/beos/syscall.inc

+ 2 - 2
rtl/beos/syscall.inc

@@ -62,12 +62,12 @@ begin
   funcresult := do_SysCall(callnr, args);
   funcresult := do_SysCall(callnr, args);
   if funcresult < 0 then
   if funcresult < 0 then
    begin
    begin
-     errno := funcresult;
+     seterrno(funcresult);
      SysCall := - 1;
      SysCall := - 1;
    end
    end
   else
   else
    begin
    begin
      SysCall := funcresult;
      SysCall := funcresult;
-     errno := 0;
+     seterrno(0);
    end;
    end;
 end;
 end;