* match.c (consume_prefix): This memory optimization should only

be done for lazy strings, otherwise it just causes unnecessary
memory use by duplicating the line, and inefficiency via
thanks to allocator churn.

1 files changed, 8 insertions, 6 deletions

diff --git a/match.c b/match.c
index 3fb64b0b..78ff23d0 100644
--- a/match.c
+++ b/match.c
@@ -411,13 +411,15 @@ static val h_text(match_line_ctx *c)
 
 static void consume_prefix(match_line_ctx *c)
 {
-  const val shift_hiwater = num_fast(4000);
-  const val shift_amount = num_fast(3900);
+  if (lazy_stringp(c->dataline)) {
+    const val shift_hiwater = num_fast(4000);
+    const val shift_amount = num_fast(3900);
 
-  if (gt(c->pos, shift_hiwater)) {
-    c->base = plus(c->base, shift_amount);
-    c->pos = minus(c->pos, shift_amount);
-    c->dataline = sub_str(c->dataline, shift_amount, t);
+    if (gt(c->pos, shift_hiwater)) {
+      c->base = plus(c->base, shift_amount);
+      c->pos = minus(c->pos, shift_amount);
+      c->dataline = sub_str(c->dataline, shift_amount, t);
+    }
   }
 }