Explorar o código

* fixed bootstrapping with 2.0.x

git-svn-id: trunk@3473 -
florian %!s(int64=19) %!d(string=hai) anos
pai
achega
34176d3d9a
Modificáronse 1 ficheiros con 2 adicións e 1 borrados
  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;