Thank you. I will be looking at this this weekend. It appears a better option to me then what I have been attempting to do.
>>Sound Super,
>>Can you send me a copy of the class (and any dependents) via email (
GregReichert@GLRsoftware.com ). Any required instruction would be appreciated.
>>My FUnit tool allows the developer to place Unit Test pretty much anywhere in the source code, general close the points needing to be tested. The test suite I am working on, scans the source code, and finds the unit tests. It extracts the locations (file, class, method, etc) of the tests and presents a tree list of the location and the tests to developer. This is where a process like your would help.
>
>You can get the whole stuff for free by d/l the FoxInCloud Application Server at
http://foxincloud.com/download.php#trialForm>
>This will install:
>
>home(1) + 'tools\ab\aw\aw.app'
>
>
>To
set procedure to all what aw.app contains:
>
>do home(1) + 'tools\ab\aw\aw.app'
>
>
>Then, to instantiate the class:
>
>o = createObject('acRegExp')
>
>
>Invariable patterns are properties, those where you can specify something like a procedure name are methods accepting parameters with a default value of 'anything'
>
>To get the pattern for 'all procedure/functions commands':
>
>? o.instsProc()
>
>To get the same pattern for a specific procedure name:
>
>? o.instsProc('myProc')
>
>
>To test the 'procedure' pattern
>
>do acRegExp_instsPROC_Test in acTxt.prg with m.yourCode
>
>This displays the result (matches and sub-matches) found in m.yourCode into _Screen and 'debug output' window
>
>To execute the 'procedure' pattern
>
>o.setup(o.instsProc(), 'gmi')
>for iMatch = 1 to o.execute(myCode)
> o.Matches[m.iMatch, 1-5]
>
>
>
>
>
>endfor
>
>
>I'll send you the source code by e-mail so that you have more information about the parameters and sub-matches.
>
>Enjoy!
Greg Reichert