--- parser3/src/main/pa_string.C 2001/04/23 13:38:31 1.78 +++ parser3/src/main/pa_string.C 2001/05/04 10:42:46 1.81 @@ -5,7 +5,7 @@ Author: Alexander Petrosyan (http://design.ru/paf) - $Id: pa_string.C,v 1.78 2001/04/23 13:38:31 paf Exp $ + $Id: pa_string.C,v 1.81 2001/05/04 10:42:46 paf Exp $ */ #include "pa_config_includes.h" @@ -336,7 +336,11 @@ const Origin& String::origin() const { // determining origin by last appended piece // because first one frequently constant. // ex: ^load[/file] "document_root" + "/file" - return append_here[-1].item.origin; + // when last peice is constant, + // ex: parser_root_auto_path{dynamic} / auto.p{const} + // using first piece + Origin& last_origin=append_here[-1].item.origin; + return last_origin.file ? last_origin : head.rows[0].item.origin; } #endif @@ -463,7 +467,7 @@ static void regex_options(char *options, int *result; } regex_option[]={ {'i', 0, PCRE_CASELESS, result}, // a=A - {'s', 0, PCRE_DOTALL, result}, // \n\n$ + {'s', 0, PCRE_DOTALL, result}, // \n\n$ [default] {'x', 0, PCRE_EXTENDED, result}, // whitespace in regex ignored {'m', PCRE_DOTALL, PCRE_MULTILINE, result}, // ^aaa\n$^bbb\n$ {'g', 0, true, result+1}, // many rows @@ -486,7 +490,7 @@ static void regex_options(char *options, returns true if fills table. table format is defined and fixed[can be used by others]: @verbatim - pre-match/match/post-match/1/2/3/... + prematch/match/postmatch/1/2/3/... @endverbatim */ bool String::match(const unsigned char *pcre_tables, @@ -563,9 +567,9 @@ bool String::match(const unsigned char * } Array& row=*NEW Array(pool()); - row+=&mid(0, ovector[0]); // .pre-match column value + row+=&mid(0, ovector[0]); // .prematch column value row+=&mid(ovector[0], ovector[1]); // .match - row+=&mid(ovector[1], size()); // .post-match + row+=&mid(ovector[1], size()); // .postmatch for(int i=1; i