[PATCH] Add Pascal/Delphi (.pas file) funcname pattern.
- From
Avery Pennarun <apenwarr@gmail.com>
- Date
- Aug 1, 2008, 19:45 UTC
- Message-ID
- <1217619915-9331-1-git-send-email-apenwarr@gmail.com>
Finds classes, records, functions, procedures, and sections. Most lines need to start at the first column, or else there's no way to differentiate a procedure's definition from its declaration.
Signed-off-by: Avery Pennarun <apenwarr@gmail.com> ---
The Ruby funcname pattern patch inspired me. Although unlike him, I didn't check with anyone else for confirmation. How many Pascal programmers can there possibly be? :)
diff.c | 4 ++++ 1 files changed, 4 insertions(+), 0 deletions(-)
diff --git a/diff.c b/diff.c index cbf2547..c73ba69 100644 --- a/diff.c +++ b/diff.c @@ -1380,6 +1380,10 @@ static struct builtin_funcname_pattern { "^[ ]*\\(\\([ ]*" "[A-Za-z_][A-Za-z_0-9]*\\)\\{2,\\}" "[ ]*([^;]*\\)$" }, + { "pas", "\\(^\\(procedure\\|function\\|constructor\\|" + "destructor\\|interface\\|implementation\\|" + "type|initialization|finalization\\).*$\\)" + "\\|\\(^.*=[ \t]*\\(class\\|record\\).*$\\)" }, { "tex", "^\\(\\\\\\(sub\\)*section{.*\\)$" }, };
-- 1.6.0.rc1.34.g23b24.dirty