1 files changed, 2 insertions, 1 deletions
diff --git a/profile.c b/profile.c
index ad0d337b..1a1a1e96 100644
--- a/profile.c
+++ b/profile.c
@@ -2072,7 +2072,8 @@ adjust_namespace(char *name, bool *malloced)
 	// unadorned name from symbol table, add awk:: if not in awk:: n.s.
 	if (strchr(name, ':') == NULL &&
 	    current_namespace != awk_namespace &&	// can be equal if namespace never changed
-	    strcmp(current_namespace, "awk") != 0) {
+	    strcmp(current_namespace, "awk") != 0 &&
+	    ! is_all_upper(name)) {
 		char *buf;
 		size_t len = 5 + strlen(name) + 1;