From 8f2b0b9128f4d2dc50ae52c304237c8e9d4b85f9 Mon Sep 17 00:00:00 2001 From: "Arnold D. Robbins" Date: Wed, 26 Jun 2019 21:34:29 +0300 Subject: Fix a problem when using awk::var kinds of names. --- symbol.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'symbol.c') diff --git a/symbol.c b/symbol.c index fe928112..e2e07c30 100644 --- a/symbol.c +++ b/symbol.c @@ -306,7 +306,10 @@ install(const char *name, NODE *parm, NODETYPE type) NODE *n_name; NODE *prev; - n_name = make_string(name, strlen(name)); + if (strncmp(name, "awk::", 5) == 0) + n_name = make_string(name + 5, strlen(name) - 5); + else + n_name = make_string(name, strlen(name)); table = symbol_table; -- cgit v1.2.3