/[pcre]/code/trunk/pcregexp.pas
ViewVC logotype

Diff of /code/trunk/pcregexp.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 148 by ph10, Tue Mar 6 15:19:44 2007 UTC revision 149 by ph10, Mon Apr 16 15:28:08 2007 UTC
# Line 104  Const { Options } Line 104  Const { Options }
104   PCRE_NEWLINE_LF       = $00200000;   PCRE_NEWLINE_LF       = $00200000;
105   PCRE_NEWLINE_CRLF     = $00300000;   PCRE_NEWLINE_CRLF     = $00300000;
106   PCRE_NEWLINE_ANY      = $00400000;   PCRE_NEWLINE_ANY      = $00400000;
107     PCRE_NEWLINE_ANYCRLF  = $00500000;
108  {$ENDIF}  {$ENDIF}
109    
110   PCRE_COMPILE_ALLOWED_OPTIONS = PCRE_ANCHORED + PCRE_AUTO_CALLOUT + PCRE_CASELESS  +   PCRE_COMPILE_ALLOWED_OPTIONS = PCRE_ANCHORED + PCRE_AUTO_CALLOUT + PCRE_CASELESS  +
# Line 112  Const { Options } Line 113  Const { Options }
113                                  PCRE_UNGREEDY + PCRE_UTF8 + PCRE_NO_UTF8_CHECK                                  PCRE_UNGREEDY + PCRE_UTF8 + PCRE_NO_UTF8_CHECK
114                                  {$IFDEF PCRE_7_0}                                  {$IFDEF PCRE_7_0}
115                                  + PCRE_DUPNAMES + PCRE_FIRSTLINE + PCRE_NEWLINE_CRLF                                  + PCRE_DUPNAMES + PCRE_FIRSTLINE + PCRE_NEWLINE_CRLF
116                                  + PCRE_NEWLINE_ANY                                  + PCRE_NEWLINE_ANY + PCRE_NEWLINE_CRLF
117                                  {$ENDIF}                                  {$ENDIF}
118                                  ;                                  ;
119    
120   PCRE_EXEC_ALLOWED_OPTIONS = PCRE_ANCHORED + PCRE_NOTBOL + PCRE_NOTEOL +   PCRE_EXEC_ALLOWED_OPTIONS = PCRE_ANCHORED + PCRE_NOTBOL + PCRE_NOTEOL +
121                               PCRE_NOTEMPTY + PCRE_NO_UTF8_CHECK + PCRE_PARTIAL                               PCRE_NOTEMPTY + PCRE_NO_UTF8_CHECK + PCRE_PARTIAL
122                               {$IFDEF PCRE_7_0}                               {$IFDEF PCRE_7_0}
123                               + PCRE_NEWLINE_CRLF + PCRE_NEWLINE_ANY                               + PCRE_NEWLINE_CRLF + PCRE_NEWLINE_ANY +PCRE_NEWLINE_ANYCRLF
124                               {$ENDIF}                               {$ENDIF}
125                               ;                               ;
126    
# Line 128  Const { Options } Line 129  Const { Options }
129                                   PCRE_NOTEMPTY + PCRE_NO_UTF8_CHECK + PCRE_PARTIAL +                                   PCRE_NOTEMPTY + PCRE_NO_UTF8_CHECK + PCRE_PARTIAL +
130                                   PCRE_DFA_SHORTEST + PCRE_DFA_RESTART +                                   PCRE_DFA_SHORTEST + PCRE_DFA_RESTART +
131                                   PCRE_NEWLINE_CR + PCRE_NEWLINE_LF + PCRE_NEWLINE_CRLF +                                   PCRE_NEWLINE_CR + PCRE_NEWLINE_LF + PCRE_NEWLINE_CRLF +
132                                   PCRE_NEWLINE_ANY;                                   PCRE_NEWLINE_ANY + PCRE_NEWLINE_ANYCRLF
133  {$ENDIF}  {$ENDIF}
134    
135  { Exec-time and get/set-time error codes }  { Exec-time and get/set-time error codes }
# Line 163  Const { Options } Line 164  Const { Options }
164  { Request types for pcre_fullinfo() }  { Request types for pcre_fullinfo() }
165    
166   PCRE_INFO_OPTIONS         =  0;   PCRE_INFO_OPTIONS         =  0;
167   PCRE_INFO_SIZE            =  1;   PCRE_INFO_SIZE            =  1;
168   PCRE_INFO_CAPTURECOUNT    =  2;   PCRE_INFO_CAPTURECOUNT    =  2;
169   PCRE_INFO_BACKREFMAX      =  3;   PCRE_INFO_BACKREFMAX      =  3;
170   PCRE_INFO_FIRSTBYTE       =  4;   PCRE_INFO_FIRSTBYTE       =  4;
# Line 180  Const { Options } Line 181  Const { Options }
181    
182  { Request types for pcre_config() }  { Request types for pcre_config() }
183  {$IFDEF PCRE_5_0}  {$IFDEF PCRE_5_0}
184   PCRE_CONFIG_UTF8                   = 0;   PCRE_CONFIG_UTF8                   = 0;
185   PCRE_CONFIG_NEWLINE                = 1;   PCRE_CONFIG_NEWLINE                = 1;
186   PCRE_CONFIG_LINK_SIZE              = 2;   PCRE_CONFIG_LINK_SIZE              = 2;
187   PCRE_CONFIG_POSIX_MALLOC_THRESHOLD = 3;   PCRE_CONFIG_POSIX_MALLOC_THRESHOLD = 3;
188   PCRE_CONFIG_MATCH_LIMIT            = 4;   PCRE_CONFIG_MATCH_LIMIT            = 4;
189   PCRE_CONFIG_STACKRECURSE           = 5;   PCRE_CONFIG_STACKRECURSE           = 5;
# Line 194  Const { Options } Line 195  Const { Options }
195    
196  { Bit flags for the pcre_extra structure }  { Bit flags for the pcre_extra structure }
197  {$IFDEF PCRE_5_0}  {$IFDEF PCRE_5_0}
198   PCRE_EXTRA_STUDY_DATA            = $0001;   PCRE_EXTRA_STUDY_DATA            = $0001;
199   PCRE_EXTRA_MATCH_LIMIT           = $0002;   PCRE_EXTRA_MATCH_LIMIT           = $0002;
200   PCRE_EXTRA_CALLOUT_DATA          = $0004;   PCRE_EXTRA_CALLOUT_DATA          = $0004;
201   PCRE_EXTRA_TABLES                = $0008;   PCRE_EXTRA_TABLES                = $0008;
202  {$ENDIF PCRE_5_0}  {$ENDIF PCRE_5_0}
203  {$IFDEF PCRE_7_0}  {$IFDEF PCRE_7_0}
204   PCRE_EXTRA_MATCH_LIMIT_RECURSION = $0010;   PCRE_EXTRA_MATCH_LIMIT_RECURSION = $0010;
# Line 214  remain compatible. } Line 215  remain compatible. }
215    
216  type ppcre_extra = ^tpcre_extra;  type ppcre_extra = ^tpcre_extra;
217       tpcre_extra = record       tpcre_extra = record
218         flags : longint;                { Bits for which fields are set }         flags : longint;                { Bits for which fields are set }
219         study_data : pointer;           { Opaque data from pcre_study() }         study_data : pointer;           { Opaque data from pcre_study() }
220         match_limit : longint;          { Maximum number of calls to match() }         match_limit : longint;          { Maximum number of calls to match() }
221         callout_data : pointer;         { Data passed back in callouts }         callout_data : pointer;         { Data passed back in callouts }
# Line 392  data is not zero. *) Line 393  data is not zero. *)
393    
394  // Always include the newest version of the library  // Always include the newest version of the library
395  {$IFDEF PCRE_3_7} {$IFNDEF PCRE_5_0} {$IFNDEF PCRE_7_0} {$L pcre37.lib} {$ENDIF PCRE_7_0} {$ENDIF PCRE_5_0} {$ENDIF PCRE_3_7}  {$IFDEF PCRE_3_7} {$IFNDEF PCRE_5_0} {$IFNDEF PCRE_7_0} {$L pcre37.lib} {$ENDIF PCRE_7_0} {$ENDIF PCRE_5_0} {$ENDIF PCRE_3_7}
396  {$IFDEF PCRE_5_0}                    {$IFNDEF PCRE_7_0} {$L pcre50.lib} {$ENDIF PCRE_7_0}                   {$ENDIF PCRE_5_0}  {$IFDEF PCRE_5_0}                    {$IFNDEF PCRE_7_0} {$L pcre50.lib} {$ENDIF PCRE_7_0}                   {$ENDIF PCRE_5_0}
397  {$IFDEF PCRE_7_0}                                       {$L pcre70.lib}                                     {$ENDIF PCRE_7_0}  {$IFDEF PCRE_7_0}                                       {$L pcre70.lib}                                     {$ENDIF PCRE_7_0}
398    
399  {TpcRegExp}  {TpcRegExp}
400    
# Line 645  begin Line 646  begin
646  //   l1:=length(PpcRegExp(P1)^.RegExp);  //   l1:=length(PpcRegExp(P1)^.RegExp);
647  //   l2:=length(PpcRegExp(P2)^.RegExp);  //   l2:=length(PpcRegExp(P2)^.RegExp);
648  //   if l1 > l2 then l:=l2 else  //   if l1 > l2 then l:=l2 else
649  //                   l:=l1;  //                   l:=l1;
650  //   for i:=1 to l do  //   for i:=1 to l do
651  //     if PpcRegExp(P1).RegExp[i] <> PpcRegExp(P2).RegExp[i] then break;  //     if PpcRegExp(P1).RegExp[i] <> PpcRegExp(P2).RegExp[i] then break;
652  //   if i <=l then  //   if i <=l then
# Line 658  begin Line 659  begin
659  //   l1:=length(PpcRegExp(P1)^.RegExp);  //   l1:=length(PpcRegExp(P1)^.RegExp);
660  //   l2:=length(SearchRegExp);  //   l2:=length(SearchRegExp);
661  //   if l1 > l2 then l:=l2 else  //   if l1 > l2 then l:=l2 else
662  //                   l:=l1;  //                   l:=l1;
663  //   for i:=1 to l do  //   for i:=1 to l do
664  //     if PpcRegExp(P1).RegExp[i] <> SearchRegExp[i] then  //     if PpcRegExp(P1).RegExp[i] <> SearchRegExp[i] then
665  //     begin  //     begin
Legend:
Removed from v.148  
changed lines
  Added in v.149
  ViewVC Help
Powered by ViewVC 1.1.5