Spell ROUNDMODE correctly in prints.

3 files changed, 7 insertions, 2 deletions

diff --git a/ChangeLog b/ChangeLog
index f71651d0..70859ca2 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -6,6 +6,11 @@
 	* symbol.c (make_symbol): Set valref to 1. Allows the
 	release_all_vars function to work.
 
+	Unrelated:
+
+	* array.c (value_info): Spell ROUNDMODE correctly in output.
+	* mpfr.c (set_ROUNDMODE): Ditto.
+
 2020-08-12         Arnold D. Robbins     <arnold@skeeve.com>
 
 	* awkgram.c, command.c: Regenerated with Bison 3.7.1.
diff --git a/array.c b/array.c
index c256620b..60d18624 100644
--- a/array.c
+++ b/array.c
@@ -709,7 +709,7 @@ value_info(NODE *n)
 					n->stfmt == STFMT_UNUSED ? "<unused>"
 					: fmt_list[n->stfmt]->stptr);
 #ifdef HAVE_MPFR
-		fprintf(output_fp, ", RNDMODE=\"%c\"", n->strndmode);
+		fprintf(output_fp, ", ROUNDMODE=\"%c\"", n->strndmode);
 #endif
 	}
 
diff --git a/mpfr.c b/mpfr.c
index f5cdd58e..38f38a3a 100644
--- a/mpfr.c
+++ b/mpfr.c
@@ -618,7 +618,7 @@ set_ROUNDMODE()
 			ROUND_MODE = rndm;
 			MPFR_round_mode = n->stptr[0];
 		} else
-			warning(_("RNDMODE value `%.*s' is invalid"), (int) n->stlen, n->stptr);
+			warning(_("ROUNDMODE value `%.*s' is invalid"), (int) n->stlen, n->stptr);
 	}
 }