--- ray/src/rt/rview.c	1992/11/19 20:25:55	2.9
+++ ray/src/rt/rview.c	1993/09/07 16:11:12	2.12
@@ -58,6 +58,8 @@ char  *devname = dev_default;		/* output device name *
 
 struct driver  *dev = NULL;		/* driver functions */
 
+char  rifname[128];			/* rad input file name */
+
 VIEW  oldview;				/* previous view parameters */
 
 PNODE  ptrunk;				/* the base of our image */
@@ -74,6 +76,10 @@ static char  *reserve_mem = NULL;	/* pre-allocated res
 quit(code)			/* quit program */
 int  code;
 {
+#ifdef MSTATS
+	if (code == 2 && errno == ENOMEM)
+		printmemstats(stderr);
+#endif
 	devclose();
 	exit(code);
 }
@@ -185,9 +191,13 @@ again:
 	else *++args = '\0';
 	
 	switch (inpbuf[0]) {
-	case 'f':				/* new frame */
-		if (badcom("frame"))
-			goto commerr;
+	case 'f':				/* new frame (or free mem.) */
+		if (badcom("frame")) {
+			if (badcom("free"))
+				goto commerr;
+			free_objmem();
+			break;
+		}
 		getframe(args);
 		break;
 	case 'v':				/* view */
@@ -200,6 +210,16 @@ again:
 			goto commerr;
 		lastview(args);
 		break;
+	case 'V':				/* save view */
+		if (badcom("V"))
+			goto commerr;
+		saveview(args);
+		break;
+	case 'L':				/* load view */
+		if (badcom("L"))
+			goto commerr;
+		loadview(args);
+		break;
 	case 'e':				/* exposure */
 		if (badcom("exposure"))
 			goto commerr;
@@ -225,7 +245,7 @@ again:
 			goto commerr;
 		getaim(args);
 		break;
-	case 'm':				/* move camera */
+	case 'm':				/* move camera (or memstats) */
 		if (badcom("move"))
 #ifdef	MSTATS
 		{
@@ -307,8 +327,8 @@ rsample()			/* sample the image */
 	 * difference, we subsample the super-pixels.  The testing process
 	 * includes initialization of the next row.
 	 */
-	xsiz = (((pframe.r-pframe.l)<<pdepth)+hresolu-1) / hresolu;
-	ysiz = (((pframe.u-pframe.d)<<pdepth)+vresolu-1) / vresolu;
+	xsiz = (((long)(pframe.r-pframe.l)<<pdepth)+hresolu-1) / hresolu;
+	ysiz = (((long)(pframe.u-pframe.d)<<pdepth)+vresolu-1) / vresolu;
 	rl = (RECT *)malloc(xsiz*sizeof(RECT));
 	if (rl == NULL)
 		return;