From 644c02aab31351f7a9afc40268332a52a85a5c41 Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Fri, 1 Dec 2006 14:03:22 +0000 Subject: [PATCH] Remove unused variable p4raw-id: //depot/perl@29431 --- regcomp.c | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/regcomp.c b/regcomp.c index 0e506e7..c5a0b7b 100644 --- a/regcomp.c +++ b/regcomp.c @@ -8669,8 +8669,7 @@ Perl_re_dup(pTHX_ const regexp *r, CLONE_PARAMS *param) regexp *ret; int i, npar; struct reg_substr_datum *s; - RXi_GET_DECL(r,ri); - + if (!r) return (REGEXP *)NULL; -- 1.8.3.1