sub-str: compat check now restores 215 behavior.

* lib.c (sub_str): If compatibility is requested, with a value
of 215 or less, then disable the optimization of returning
the original string without making a copy. This was found
to break the @(freeform) directive.  That regression alerts me
to the fact that I should have made this subject to
compatibility; some user code could be affected.

* txr.1: New compat note added, under 215.

1 files changed, 3 insertions, 1 deletions

diff --git a/lib.c b/lib.c
index 4fdcaacf..c3428c22 100644
--- a/lib.c
+++ b/lib.c
@@ -4631,7 +4631,9 @@ val sub_str(val str_in, val from, val to)
 
   if (ge(from, to)) {
     return null_string;
-  } else if (from == zero && eql(to, len)) {
+  } else if (from == zero && eql(to, len) &&
+             (opt_compat == 0 || opt_compat > 215))
+  {
     return str_in;
   } else {
     size_t nchar = c_num(to, self) - c_num(from, self) + 1;