From 5f28e9070b88293b13cb9db11b04646d8a8fbcf0 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Tue, 6 Aug 1996 00:03:04 +0200
Subject: [PATCH] regexp() fixed
Rev: lib/simulate.lpc:1.21
---
lib/simulate.lpc | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/lib/simulate.lpc b/lib/simulate.lpc
index d1cb9a33cd..266178226d 100644
--- a/lib/simulate.lpc
+++ b/lib/simulate.lpc
@@ -324,9 +324,11 @@ function get_function(object o, string a)
string *regexp(string *s, string reg)
{
+
regexp::create(reg);
- return filter_array(s,match);
+ s=filter_array(s,match);
regexp::create(); /* Free compiled regexp */
+ return s;
}
list mklist(mixed *a)
--
GitLab