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

classes: since AThreads supports suspended thread creation, enable resume code in AfterConstruction for Amiga-like platforms too

git-svn-id: trunk@30941 -
Károly Balogh преди 10 години
родител
ревизия
cdea58317e
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      rtl/objpas/classes/classes.inc

+ 1 - 1
rtl/objpas/classes/classes.inc

@@ -236,7 +236,7 @@ begin
 // enable for all platforms once http://bugs.freepascal.org/view.php?id=16884
 // is fixed for all platforms (in case the fix for non-unix platforms also
 // requires this field at least)
-{$if defined(unix) or defined(windows) or defined(os2)}
+{$if defined(unix) or defined(windows) or defined(os2) or defined(hasamiga)}
   if not FExternalThread and not FInitialSuspended then
     Resume;
 {$endif}