Selaa lähdekoodia

Merged revisions 3052 via svnmerge from
svn+ssh://[email protected]/FPC/svn/fpc/trunk

........
r3052 | marco | 2006-03-27 11:01:14 +0200 (Mon, 27 Mar 2006) | 2 lines

* PSysCharset.

........

git-svn-id: branches/fixes_2_0@3054 -

marco 19 vuotta sitten
vanhempi
commit
237bb449d4
1 muutettua tiedostoa jossa 1 lisäystä ja 0 poistoa
  1. 1 0
      rtl/objpas/sysutils/sysstrh.inc

+ 1 - 0
rtl/objpas/sysutils/sysstrh.inc

@@ -190,6 +190,7 @@ const
 
 Type
   TSysCharSet = Set of char;
+  PSysCharSet = ^TSysCharSet;
 
 Function FindCmdLineSwitch(const Switch: string; const Chars: TSysCharSet;IgnoreCase: Boolean): Boolean;
 Function FindCmdLineSwitch(const Switch: string; IgnoreCase: Boolean): Boolean;