iris

commit 6c977b947bfd7986d1f0daf541bcd40abc949b91
parent 3bf505874b1285e0e9b91dafb755dfbaaa0d88bb
Author: sin <sin@2f30.org>
Date:   Thu, 15 May 2014 12:21:54 +0100

Do not allow multiple arguments to define

Diffstat:
M
parser.c
 | 
2
++

1 file changed, 2 insertions(+), 0 deletions(-)
diff --git a/parser.c b/parser.c
@@ -306,6 +306,8 @@ evaldefine(struct object *o)
 				return error("expected identifier");
 			if (!caddr(o))
 				return error("expected sexpression");
+			if (cadddr(o))
+				return error("multiple arguments to define");
 			val = eval(caddr(o));
 			if (val->type == OError)
 				return val;