This is part of a tool I am developing. A test suite console for my FUnit tool.
>Please forgive me I am totally wrong, but it seems to me like you are tying to reinvent the wheel. Have you ever tried
Gofish?
>
>>Have been trying to construct a Regular Expression pattern to find a string that only exists at the beginning of a line, even if there are none or more white spaces before it (either spaces or tabs).
>>
>>Example text I'm search
>>
>>
>>DEFINE CLASS test
>> PROCEDURE init
>> IF ATC("DEFINE CLASS",x)>0
>> *
>> ENDIF
>> IF ATC("PROCEDURE",x)>0
>> *
>> ENDIF
>> ENDPROC
>> PROCEDURE destroy
>> ENDPROC
>>ENDDEFINE
>>
>>
>>If I am look for the "DEFINE CLASS" (ignoring the case), I would like for it to find only the "DEFINE CLASS test". Also, If I am looking for "PROCEDURE", I want it to find only the "PROCEDURE init" and "PROCEDURE destory", not the one in the ATC().
>>
>>Here is a example of the search code I am trying.
>>
>>
>>RegExp = NEWOBJECT( "_RegExp", "RegExp.vcx" )
>>ctext=FILETOSTR("tt.prg")
>>? RegExp.execute( ctext, [(\bdefine class\b)], .F., .T.)
>>? RegExp.execute( ctext, [(\bprocedure\b)], .F., .T.)
>>
>>
>>I realize I need to be including the '^' (start of line), possibly '\s*' for the white spaces. but when I do include them the query fails to find anything. I only want it to find matches that are at the beginning of the lines.
Greg Reichert