From 6b6089f3c98bc00cfe9d86f0ee9913132b8aed40 Mon Sep 17 00:00:00 2001
From: joost <joost@3ad0048d-3df7-0310-abae-a5850022a9f2>
Date: Thu, 10 Mar 2011 19:03:00 +0000
Subject:  * Fixed compilation on WinCE after r17114 and r17094

git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@17115 3ad0048d-3df7-0310-abae-a5850022a9f2
---
 compiler/globals.pas | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/compiler/globals.pas b/compiler/globals.pas
index 86da6e42b4..0d2235c1d8 100644
--- a/compiler/globals.pas
+++ b/compiler/globals.pas
@@ -718,7 +718,7 @@ implementation
                           Default Macro Handling
 ****************************************************************************}
 
-{$ifdef windows}
+{$ifdef mswindows}
 {
   This code is copied from sysutils.pp
 }
@@ -784,11 +784,11 @@ implementation
                Result:=IncludeTrailingPathDelimiter(StrPas(@APath[0]));
            end;
        end;
-{$endif windows}
+{$endif mswindows}
 
 
      procedure DefaultReplacements(var s:ansistring);
-       {$ifdef windows}
+       {$ifdef mswindows}
        procedure ReplaceSpecialFolder(const MacroName: string; const ID: integer);
          begin
            // Only try to receive the special folders (and thus dynamically
@@ -797,7 +797,7 @@ implementation
              Replace(s,MacroName,GetSpecialDir(ID));
          end;
 
-       {$endif windows}
+       {$endif mswindows}
        var
          envstr: string;
          envvalue: pchar;
@@ -813,7 +813,7 @@ implementation
            Replace(s,'$FPCTARGET',target_os_string)
          else
            Replace(s,'$FPCTARGET',target_full_string);
-{$ifdef windows}
+{$ifdef mswindows}
          ReplaceSpecialFolder('$LOCAL_APPDATA',CSIDL_LOCAL_APPDATA);
          ReplaceSpecialFolder('$APPDATA',CSIDL_APPDATA);
          ReplaceSpecialFolder('$COMMON_APPDATA',CSIDL_COMMON_APPDATA);
@@ -821,7 +821,7 @@ implementation
          ReplaceSpecialFolder('$PROGRAM_FILES',CSIDL_PROGRAM_FILES);
          ReplaceSpecialFolder('$PROGRAM_FILES_COMMON',CSIDL_PROGRAM_FILES_COMMON);
          ReplaceSpecialFolder('$PROFILE',CSIDL_PROFILE);
-{$endif windows}
+{$endif mswindows}
          { Replace environment variables between dollar signs }
          i := pos('$',s);
          while i>0 do
@@ -1581,10 +1581,10 @@ implementation
         features:=[low(Tfeature)..high(Tfeature)];
      end;
 
-{$ifdef windows}
+{$ifdef mswindows}
 initialization
 finalization
   if CFGDLLHandle<>0 then
     FreeLibrary(CFGDllHandle);
-{$endif windows}
+{$endif mswindows}
 end.
-- 
cgit v1.2.1