From 13ab7280aa553e2398b8aab8a9e66d32f43599ce Mon Sep 17 00:00:00 2001 From: Oliver Kiddle Date: Mon, 17 Dec 2001 11:10:46 +0000 Subject: fix bug in parameter unset code that caused seg fault (16351) --- Src/params.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'Src/params.c') diff --git a/Src/params.c b/Src/params.c index ac7f084bd..5c4d61e69 100644 --- a/Src/params.c +++ b/Src/params.c @@ -2174,7 +2174,8 @@ stdunsetfn(Param pm, int exp) switch (PM_TYPE(pm->flags)) { case PM_SCALAR: pm->sets.cfn(pm, NULL); break; case PM_ARRAY: pm->sets.afn(pm, NULL); break; - case PM_HASHED: pm->sets.hfn(pm, NULL); break; + case PM_HASHED: pm->sets.hfn(pm, NULL); break; + default: pm->u.str = NULL; break; } pm->flags |= PM_UNSET; } -- cgit 1.4.1