From 8b95fb8377a8c05c378186f6876c057a95145e34 Mon Sep 17 00:00:00 2001
From: marcus <marcus@idefix.freepascal.org>
Date: Sun, 12 Apr 2020 20:47:35 +0000
Subject: [PATCH] Morphos: Fixed compilation after r44709

git-svn-id: trunk@44711 -
---
 rtl/amicommon/dos.pp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/rtl/amicommon/dos.pp b/rtl/amicommon/dos.pp
index dfdec2a8cd..2f14441135 100644
--- a/rtl/amicommon/dos.pp
+++ b/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