* lib.c (lazy_sub_str): Bugfix: "from" was mistakenly used

in the adjustment of the "to" value.

* match.c (search_form): Use predefined constants for -1 and 1
instead of calling num.

1 files changed, 1 insertions, 1 deletions

diff --git a/lib.c b/lib.c
index 2b5bd031..839dc116 100644
--- a/lib.c
+++ b/lib.c
@@ -2064,7 +2064,7 @@ static val lazy_sub_str(val lstr, val from, val to)
     to = t;
   } else {
     if (lt(to, zero)) {
-      to = plus(from, len = length_str(lstr));
+      to = plus(to, len = length_str(lstr));
       to = max(zero, to);
     }