From ecc2e67a20ddd959048ff1d11b116f2ed28a2626 Mon Sep 17 00:00:00 2001
From: florian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2>
Date: Mon, 3 Jul 2017 20:48:53 +0000
Subject: * fixed spelling: fpc_mode -> gpc_mode

git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@36632 3ad0048d-3df7-0310-abae-a5850022a9f2
---
 compiler/globtype.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'compiler/globtype.pas')

diff --git a/compiler/globtype.pas b/compiler/globtype.pas
index 073813b6e7..b01960335a 100644
--- a/compiler/globtype.pas
+++ b/compiler/globtype.pas
@@ -390,7 +390,7 @@ interface
        tmodeswitch = (m_none,
          { generic }
          m_fpc,m_objfpc,m_delphi,m_tp7,m_mac,m_iso,m_extpas,
-         {$ifdef fpc_mode}m_gpc,{$endif}
+         {$ifdef gpc_mode}m_gpc,{$endif}
          { more specific }
          m_class,               { delphi class model }
          m_objpas,              { load objpas unit }
@@ -580,7 +580,7 @@ interface
 
        modeswitchstr : array[tmodeswitch] of string[18] = ('',
          '','','','','','','',
-         {$ifdef fpc_mode}'',{$endif}
+         {$ifdef gpc_mode}'',{$endif}
          { more specific }
          'CLASS',
          'OBJPAS',
-- 
cgit v1.2.1