TEST: Oldes/Rebol-issues#1028

Author: Oldes

src/tests/units/decimal-test.r3

@@ -45,6 +45,12 @@ Rebol [
 	--assert   $0 = round/to 0.499 $1
 	--assert money? round/to 0.5   $1
 
+	--test-- "round/to (percent)"
+	;@@ https://github.com/Oldes/Rebol-issues/issues/1028
+	--assert 150% = round/to 1.45677 10%
+	--assert 150% = round/to 145.6%  10%
+	--assert 150% = to percent! round/to 1.45677 to decimal! 10%
+
 	--test-- "round/down"
 	--assert  1.0 = round/down  1.999
 	--assert -1.0 = round/down -1.999