Explorar o código

Morphos: Fixed compilation after r44709

git-svn-id: trunk@44711 -
marcus %!s(int64=5) %!d(string=hai) anos
pai
achega
8b95fb8377
Modificáronse 1 ficheiros con 2 adicións e 0 borrados
  1. 2 0
      rtl/amicommon/dos.pp

+ 2 - 0
rtl/amicommon/dos.pp

@@ -1082,7 +1082,9 @@ Var
 begin
   SetLength(EnvList, 0);
   // pr_LocalVars are introduced with OS2.0
+  {$ifdef AMIGA68k}
   if PLibrary(AOS_ExecBase)^.lib_Version >= 36 then
+  {$endif}
   begin
     ThisProcess := PProcess(FindTask(nil));  //Get the pointer to our process
     LocalVars_List := @(ThisProcess^.pr_LocalVars);  //get the list of pr_LocalVars as pointer