Fix inconsistency in regex-source.

If we compile the regex expression (compound "str*"), calling
regex-source on the compiled regex object yields "str*".
That, of course, is treated as regex character syntax if
fed back to regex-compile, and the * becomes an operator.

We want the source to be (compound "str*").

This happens because the AST optimizer reduces
(compound X) -> X.

* regex.c (regex_compile): If the optimized expression is just
a character string atom S, then for the purposes of
maintaining the source code, convert it to (compound S).

0 files changed, 0 insertions, 0 deletions