diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2019-01-08 21:20:17 +0200 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2019-01-08 21:20:17 +0200 |
| commit | 995f235bdaa3a2b44d3e920f81a9f76373c56f58 (patch) | |
| tree | 730670024001f2dbc010fa5c43c2dad2ad09bd13 /cint_array.c | |
| parent | 66c1625cc8cec979cfe265daaa2b55e29b956f83 (diff) | |
| parent | 0e1fd064f13b220a129fc720607d3f62b55b3b19 (diff) | |
| download | gawk-feature/namespaces.tar.gz | |
Merge branch 'master' into feature/namespacesfeature/namespaces
Diffstat (limited to 'cint_array.c')
| -rw-r--r-- | cint_array.c | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/cint_array.c b/cint_array.c index 7db45fd2..497bd792 100644 --- a/cint_array.c +++ b/cint_array.c @@ -59,7 +59,8 @@ static NODE **cint_dump(NODE *symbol, NODE *ndump); static void cint_print(NODE *symbol); #endif -afunc_t cint_array_func[] = { +const array_funcs_t cint_array_func = { + "cint", cint_array_init, is_uinteger, cint_lookup, @@ -255,9 +256,9 @@ xinstall: */ if (is_integer(xn, subs)) - xn->array_funcs = int_array_func; + xn->array_funcs = & int_array_func; else - xn->array_funcs = str_array_func; + xn->array_funcs = & str_array_func; xn->flags |= XARRAY; } return xn->alookup(xn, subs); @@ -525,7 +526,7 @@ cint_dump(NODE *symbol, NODE *ndump) kb += (INT32_BIT * sizeof(NODE *)) / 1024.0; /* symbol->nodes */ kb += (symbol->array_capacity * sizeof(NODE *)) / 1024.0; /* value nodes in Node_array_leaf(s) */ if (xn != NULL) { - if (xn->array_funcs == int_array_func) + if (xn->array_funcs == & int_array_func) kb += int_kilobytes(xn); else kb += str_kilobytes(xn); |