--- ray/src/cv/mgflib/object.c	1995/05/10 17:18:45	1.3
+++ ray/src/cv/mgflib/object.c	1995/11/29 16:46:56	1.5
@@ -28,13 +28,15 @@ char	**av;
 {
 	if (ac == 1) {				/* just pop top object */
 		if (obj_nnames < 1)
-			return(MG_OK);		/* should be error? */
+			return(MG_ECNTXT);
 		free((MEM_PTR)obj_name[--obj_nnames]);
 		obj_name[obj_nnames] = NULL;
 		return(MG_OK);
 	}
 	if (ac != 2)
 		return(MG_EARGC);
+	if (!isname(av[1]))
+		return(MG_EILL);
 	if (obj_nnames >= obj_maxname-1) {	/* enlarge array */
 		if (!obj_maxname)
 			obj_name = (char **)malloc(