From ad7636e62e32d60a320145f8a727a2f2ffc9f6b4 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Sun, 4 Mar 2012 23:45:14 -0800
Subject: Bug #35718. Workaround good enough to get some code working.

* eval.c (cons_find): New function.
(expand_op): Use cons_find rather than tree_find to look for
rest_gensym.

* regex.c (regsub): Rearranged arguments so that the string
is last. This is better for partial evaluaton via the op
operator.

* regex.h (regsub): Updated declaration.
---
 regex.h | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'regex.h')

diff --git a/regex.h b/regex.h
index a5911790..7c589798 100644
--- a/regex.h
+++ b/regex.h
@@ -28,4 +28,4 @@ val regex_compile(val regex_sexp);
 val regexp(val);
 val search_regex(val haystack, val needle_regex, val start_num, val from_end);
 val match_regex(val str, val regex, val pos);
-val regsub(val str, val regex, val repl);
+val regsub(val regex, val repl, val str);
-- 
cgit v1.2.3