diff options
| author | Karl Williamson <khw@cpan.org> | 2018-11-11 21:42:51 -0700 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2018-11-16 08:54:16 -0700 |
| commit | dafb254405696d9098a8d8452edea4ff150d3afb (patch) | |
| tree | 30985f97a65935f89c0e9563fc24f63b9665ed43 /regcomp.h | |
| parent | b432b281adf94838a75c0c77faee5b236a1e8297 (diff) | |
| download | perl-dafb254405696d9098a8d8452edea4ff150d3afb.tar.gz | |
-Drv now turns on all regex debugging
This commit makes the v (verbose) modifier to -Dr do something: turn on
all possible regex debugging.
Diffstat (limited to 'regcomp.h')
| -rw-r--r-- | regcomp.h | 48 |
1 files changed, 24 insertions, 24 deletions
@@ -1003,57 +1003,57 @@ re.pm, especially to the documentation. #define RE_DEBUG_FLAG(x) (re_debug_flags & x) /* Compile */ #define DEBUG_COMPILE_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_COMPILE_MASK) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_COMPILE_MASK)) x ) #define DEBUG_PARSE_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_COMPILE_PARSE) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_COMPILE_PARSE)) x ) #define DEBUG_OPTIMISE_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_COMPILE_OPTIMISE) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_COMPILE_OPTIMISE)) x ) #define DEBUG_DUMP_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_COMPILE_DUMP) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_COMPILE_DUMP)) x ) #define DEBUG_TRIE_COMPILE_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_COMPILE_TRIE) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_COMPILE_TRIE)) x ) #define DEBUG_FLAGS_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_COMPILE_FLAGS) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_COMPILE_FLAGS)) x ) #define DEBUG_TEST_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_COMPILE_TEST) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_COMPILE_TEST)) x ) /* Execute */ #define DEBUG_EXECUTE_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_EXECUTE_MASK) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_EXECUTE_MASK)) x ) #define DEBUG_INTUIT_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_EXECUTE_INTUIT) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_EXECUTE_INTUIT)) x ) #define DEBUG_MATCH_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_EXECUTE_MATCH) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_EXECUTE_MATCH)) x ) #define DEBUG_TRIE_EXECUTE_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_EXECUTE_TRIE) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_EXECUTE_TRIE)) x ) /* Extra */ #define DEBUG_EXTRA_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_EXTRA_MASK) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_EXTRA_MASK)) x ) #define DEBUG_OFFSETS_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_EXTRA_OFFSETS) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_EXTRA_OFFSETS)) x ) #define DEBUG_STATE_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_EXTRA_STATE) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_EXTRA_STATE)) x ) #define DEBUG_STACK_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_EXTRA_STACK) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_EXTRA_STACK)) x ) #define DEBUG_BUFFERS_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_EXTRA_BUFFERS) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_EXTRA_BUFFERS)) x ) #define DEBUG_OPTIMISE_MORE_r(x) DEBUG_r( \ - if ((RE_DEBUG_EXTRA_OPTIMISE|RE_DEBUG_COMPILE_OPTIMISE) == \ - (re_debug_flags & (RE_DEBUG_EXTRA_OPTIMISE|RE_DEBUG_COMPILE_OPTIMISE)) ) x ) + if (DEBUG_v_TEST || ((RE_DEBUG_EXTRA_OPTIMISE|RE_DEBUG_COMPILE_OPTIMISE) == \ + (re_debug_flags & (RE_DEBUG_EXTRA_OPTIMISE|RE_DEBUG_COMPILE_OPTIMISE)))) x ) #define MJD_OFFSET_DEBUG(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_EXTRA_OFFDEBUG) \ + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_EXTRA_OFFDEBUG)) \ Perl_warn_nocontext x ) #define DEBUG_TRIE_COMPILE_MORE_r(x) DEBUG_TRIE_COMPILE_r( \ - if (re_debug_flags & RE_DEBUG_EXTRA_TRIE) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_EXTRA_TRIE)) x ) #define DEBUG_TRIE_EXECUTE_MORE_r(x) DEBUG_TRIE_EXECUTE_r( \ - if (re_debug_flags & RE_DEBUG_EXTRA_TRIE) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_EXTRA_TRIE)) x ) #define DEBUG_TRIE_r(x) DEBUG_r( \ - if (re_debug_flags & (RE_DEBUG_COMPILE_TRIE \ - | RE_DEBUG_EXECUTE_TRIE )) x ) + if (DEBUG_v_TEST || (re_debug_flags & (RE_DEBUG_COMPILE_TRIE \ + | RE_DEBUG_EXECUTE_TRIE ))) x ) #define DEBUG_GPOS_r(x) DEBUG_r( \ - if (re_debug_flags & RE_DEBUG_EXTRA_GPOS) x ) + if (DEBUG_v_TEST || (re_debug_flags & RE_DEBUG_EXTRA_GPOS)) x ) /* initialization */ /* get_sv() can return NULL during global destruction. */ |