From 69b4c6e0b70f92e829848e21c4d8983fac904f30 Mon Sep 17 00:00:00 2001 From: "Andrew J. Schorr" Date: Mon, 14 Jan 2019 22:39:00 -0500 Subject: Add assoc_set inline function for setting array elements. --- awk.h | 15 +++++++++++++++ 1 file changed, 15 insertions(+) (limited to 'awk.h') diff --git a/awk.h b/awk.h index bac788b3..9b5d359c 100644 --- a/awk.h +++ b/awk.h @@ -1362,6 +1362,21 @@ extern int fatal_tag_valid; /* assoc_remove --- remove an index from symbol[] */ #define assoc_remove(a, s) ((a)->aremove(a, s) != NULL) +/* assoc_set -- set an element in an array */ + +static inline void +assoc_set(NODE *array, NODE *sub, NODE *value) +{ + + NODE **lhs = assoc_lookup(array, sub); + unref(*lhs); + *lhs = value; + if (array->astore != NULL) + (*array->astore)(array, sub); + unref(sub); +} + + /* ------------- Function prototypes or defs (as appropriate) ------------- */ /* array.c */ typedef enum { SORTED_IN = 1, ASORT, ASORTI } sort_context_t; -- cgit v1.2.3