diff options
| author | Yves Orton <demerphq@gmail.com> | 2015-10-05 18:49:46 +0200 |
|---|---|---|
| committer | Yves Orton <demerphq@gmail.com> | 2015-10-05 21:10:49 +0200 |
| commit | f83e001e339db3eb180f5f1918c268681665839d (patch) | |
| tree | 1f4abd6de375256c1169c3f28b4e8a082ab6d20c /regnodes.h | |
| parent | fee505829585692618c3f9bb28a8f0464553ec94 (diff) | |
| download | perl-f83e001e339db3eb180f5f1918c268681665839d.tar.gz | |
Cleanup, document, and restructure regen/regcomp.pl
We cleanup the parsing code, replacing our set of arrays of
properties with an array of hashes of properties, with
utility subs registering new items, etc.
We also split up the output code into a set of subs,
one sub per output "blob" (generaly a var definition),
so that we have some visibility of the higher level strucuture
of our output code. With this patch visibility of the structure
of what we generate emerges from the nest of here docs. :-)
Note this change does not (greatly) alter regcomp.sym or
perldebguts.pod, it merely cleans up and generally speaking
modernizes and most importantly documents the code.
Diffstat (limited to 'regnodes.h')
| -rw-r--r-- | regnodes.h | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/regnodes.h b/regnodes.h index c05003d1e0..f27abe0c7c 100644 --- a/regnodes.h +++ b/regnodes.h @@ -291,9 +291,10 @@ EXTCONST U8 PL_regkind[] = { }; #endif +#ifdef REG_COMP_C + /* regarglen[] - How large is the argument part of the node (in regnodes) */ -#ifdef REG_COMP_C static const U8 regarglen[] = { 0, /* END */ 0, /* SUCCEED */ @@ -492,6 +493,7 @@ static const char reg_off_by_arg[] = { #endif /* REG_COMP_C */ + /* reg_name[] - Opcode/state names in string form, for debugging */ #ifndef DOINIT |