[flang] Final fixes before review
Original-commit: flang-compiler/f18@efe5c1b8ec60f7c3d2a083da12924bc4523e6f72
Reviewed-on: https://github.com/flang-compiler/f18/pull/472
Tree-same-pre-rewrite: false
diff --git a/flang/lib/evaluate/intrinsics.cc b/flang/lib/evaluate/intrinsics.cc
index 9bb95f2..fc4dce7 100644
--- a/flang/lib/evaluate/intrinsics.cc
+++ b/flang/lib/evaluate/intrinsics.cc
@@ -510,8 +510,8 @@
SameNumeric, Rank::dimReduced},
{"precision", {{"x", AnyFloating, Rank::anyOrAssumedRank}}, DefaultInt},
{"present", {{"a", Anything, Rank::anyOrAssumedRank}}, DefaultLogical},
- {"radix", {{"x", AnyFloating, Rank::anyOrAssumedRank}}, DefaultInt},
- {"range", {{"x", AnyFloating, Rank::anyOrAssumedRank}}, DefaultInt},
+ {"radix", {{"x", AnyNumeric, Rank::anyOrAssumedRank}}, DefaultInt},
+ {"range", {{"x", AnyNumeric, Rank::anyOrAssumedRank}}, DefaultInt},
{"rank", {{"a", Anything, Rank::anyOrAssumedRank}}, DefaultInt},
{"real", {{"a", AnyNumeric, Rank::elementalOrBOZ}, DefaultingKIND},
KINDReal},
