Procházet zdrojové kódy

* fixed bootstrapping with 2.0.x

git-svn-id: trunk@3473 -
florian před 19 roky
rodič
revize
34176d3d9a
1 změnil soubory, kde provedl 2 přidání a 1 odebrání
  1. 2 1
      rtl/objpas/sysutils/datih.inc

+ 2 - 1
rtl/objpas/sysutils/datih.inc

@@ -78,7 +78,8 @@ const
    }
 
 type
-{$ifndef windows}
+{ windows isn't defined in 2.0.2 (FK) }
+{$if not(defined(windows)) and not(defined(win32))}
    { Win32 reuses the struct from the Windows unit }
    TSystemTime = record
       Year, Month, Day: word;