--- ray/src/cal/rcalc.c	2003/11/06 05:39:33	1.10
+++ ray/src/cal/rcalc.c	2004/03/28 20:33:12	1.12
@@ -1,5 +1,5 @@
 #ifndef lint
-static const char RCSid[] = "$Id: rcalc.c,v 1.10 2003/11/06 05:39:33 greg Exp $";
+static const char RCSid[] = "$Id: rcalc.c,v 1.12 2004/03/28 20:33:12 schorsch Exp $";
 #endif
 /*
  *  rcalc.c - record calculator program.
@@ -8,14 +8,17 @@ static const char RCSid[] = "$Id: rcalc.c,v 1.10 2003/
  */
 
 #include  <stdlib.h>
+#include  <fcntl.h>
 #include  <stdio.h>
 #include  <string.h>
 #include  <math.h>
 #include  <ctype.h>
 
 #include  "platform.h"
-#include  "calcomp.h"
 #include  "rterror.h"
+#include  "rtmisc.h"
+#include  "rtio.h"
+#include  "calcomp.h"
 
 #define  isnum(c)       (isdigit(c) || (c)=='-' || (c)=='.' \
 				|| (c)=='+' || (c)=='e' || (c)=='E')
@@ -218,6 +221,7 @@ eputs(" [-b][-l][-n][-w][-u][-tS][-s svar=sval][-e exp
 			execute(argv[i]);
 	
 	quit(0);
+	return 0; /* pro forma return */
 }