From 3278ad8490ce04f5178e8873661a369f34d04531 Mon Sep 17 00:00:00 2001 From: Peter Stephenson Date: Thu, 29 Mar 2001 10:52:15 +0000 Subject: disallow changing of parameter type for autoloadable parameter (bug 219459 on Sourceforge). --- Src/builtin.c | 14 ++++++++++---- 1 file changed, 10 insertions(+), 4 deletions(-) (limited to 'Src/builtin.c') diff --git a/Src/builtin.c b/Src/builtin.c index e73a7a452..627a3b82c 100644 --- a/Src/builtin.c +++ b/Src/builtin.c @@ -1628,10 +1628,16 @@ typeset_single(char *cname, char *pname, Param pm, int func, if ((tc = chflags && chflags != (PM_EFLOAT|PM_FFLOAT))) usepm = 0; } - if (tc && (pm->flags & PM_SPECIAL)) { - zerrnam(cname, "%s: can't change type of a special parameter", - pname, 0); - return NULL; + if (tc){ + if (pm->flags & PM_SPECIAL) { + zerrnam(cname, "%s: can't change type of a special parameter", + pname, 0); + return NULL; + } else if (pm->flags & PM_AUTOLOAD) { + zerrnam(cname, "%s: can't change type of autoloaded parameter", + pname, 0); + return NULL; + } } /* -- cgit 1.4.1