diff --git a/src/rec/calcRecord.c b/src/rec/calcRecord.c
index 2c3f5a3c5..e66529d65 100644
--- a/src/rec/calcRecord.c
+++ b/src/rec/calcRecord.c
@@ -148,7 +148,7 @@ static long init_record(pcalc,pass)
     int i;
     double *pvalue;
     short error_number;
-    char rpbuf[184];
+    char rpbuf[200];
 
     if (pass==0) return(0);
 
@@ -198,7 +198,7 @@ static long special(paddr,after)
     struct calcRecord  	*pcalc = (struct calcRecord *)(paddr->precord);
     int           	special_type = paddr->special;
     short error_number;
-    char rpbuf[184];
+    char rpbuf[200];
 
     if(!after) return(0);
     switch(special_type) {
diff --git a/src/rec/calcRecord.dbd b/src/rec/calcRecord.dbd
index 5d7269e59..6dcbc6712 100644
--- a/src/rec/calcRecord.dbd
+++ b/src/rec/calcRecord.dbd
@@ -9,7 +9,7 @@ recordtype(calc) {
 		promptgroup(GUI_CALC)
 		special(SPC_CALC)
 		pp(TRUE)
-		size(36)
+		size(40)
 	}
 	field(INPA,DBF_INLINK) {
 		prompt("Input A")
@@ -286,7 +286,7 @@ recordtype(calc) {
 		prompt("Reverse Polish Calc")
 		special(SPC_NOMOD)
 		interest(4)
-		size(184)
-		extra("char	rpcl[184]")
+		size(200)
+		extra("char	rpcl[200]")
 	}
 }