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

* name of the mode for ISO Extended Pascal is ExtendedPascal, not Extended

git-svn-id: trunk@47595 -
svenbarth преди 4 години
родител
ревизия
5ce84538a4
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      packages/fcl-passrc/src/pscanner.pp

+ 1 - 1
packages/fcl-passrc/src/pscanner.pp

@@ -3797,7 +3797,7 @@ begin
     SetMode(msMac,MacModeSwitches,false,bsMacPasMode);
   'ISO':
     SetMode(msIso,ISOModeSwitches,false,[],[],false);
-  'EXTENDED':
+  'EXTENDEDPASCAL':
     SetMode(msExtpas,ExtPasModeSwitches,false,[],[],false);
   'GPC':
     SetMode(msGPC,GPCModeSwitches,false);