paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-29 21:42:28 +01:00
Code Issues Packages Projects Releases Wiki Activity

added syneditregexsearch.pas

Browse Source 
git-svn-id: trunk@3165 -
This commit is contained in:
mattias 2002-08-18 16:50:08 +00:00
parent 83894d1dc1
commit f0590fba4f
1 changed files with 45 additions and 46 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
components/synedit/synregexpr.pas
View File

@ -442,13 +442,13 @@ interface
{$IFNDEF FPC} {$IFNDEF FPC}
{$DEFINE reRealExceptionAddr} // if defined then exceptions will {$DEFINE reRealExceptionAddr} // if defined then exceptions will
{$ENDIF}
// jump to appropriate source line, not to Error procedure // jump to appropriate source line, not to Error procedure
{$ENDIF}
{$DEFINE ComplexBraces} // define for beta-version of braces {$DEFINE ComplexBraces} // define for beta-version of braces
// (in stable version it works only for simple cases) // (in stable version it works only for simple cases)
{.$DEFINE UniCode} // define for Unicode support {off $DEFINE UniCode} // define for Unicode support
{$IFNDEF UniCode} // optionts applicable only for non-UniCode {$IFNDEF UniCode} // optionts applicable only for non-UniCode
{$DEFINE UseSetOfChar} // Significant optimization by using set of char {$DEFINE UseSetOfChar} // Significant optimization by using set of char
@ -548,7 +548,6 @@ const
type type
{$IFDEF UseSetOfChar} {$IFDEF UseSetOfChar}
PSetOfREChar = ^TSetOfREChar; PSetOfREChar = ^TSetOfREChar;
TSetOfREChar = set of REChar; TSetOfREChar = set of REChar;