diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2012-03-01 20:29:12 +0200 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2012-03-01 20:29:12 +0200 |
commit | 473623f186c3699c8886ccdd8a2afb7f4fe7a07e (patch) | |
tree | 40b075a492be67b317635d9102e2441d74ce9569 /cint_array.c | |
parent | 2b8a8424212839cd30490e4245c0c5119904eca3 (diff) | |
parent | 1c06c5c6f0f6d46f63977dd7407d86ccc2614226 (diff) | |
download | egawk-473623f186c3699c8886ccdd8a2afb7f4fe7a07e.tar.gz egawk-473623f186c3699c8886ccdd8a2afb7f4fe7a07e.tar.bz2 egawk-473623f186c3699c8886ccdd8a2afb7f4fe7a07e.zip |
Merge branch 'gawk_mpfr' of git.sv.gnu.org:/srv/git/gawk into gawk_mpfr
Diffstat (limited to 'cint_array.c')
-rw-r--r-- | cint_array.c | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/cint_array.c b/cint_array.c index 8ec09239..f82eb4b6 100644 --- a/cint_array.c +++ b/cint_array.c @@ -52,7 +52,6 @@ static NODE **cint_list(NODE *symbol, NODE *t); static NODE **cint_copy(NODE *symbol, NODE *newsymb); static NODE **cint_dump(NODE *symbol, NODE *ndump); #ifdef ARRAYDEBUG -static NODE **cint_option(NODE *opt, NODE *val); static void cint_print(NODE *symbol); #endif @@ -66,9 +65,6 @@ array_ptr cint_array_func[] = { cint_list, cint_copy, cint_dump, -#ifdef ARRAYDEBUG - cint_option, -#endif }; static inline int cint_hash(long k); @@ -624,22 +620,6 @@ cint_find(NODE *symbol, long k, int h1) #ifdef ARRAYDEBUG -static NODE ** -cint_option(NODE *opt, NODE *val) -{ - NODE *tmp; - NODE **ret = (NODE **) ! NULL; - - tmp = force_string(opt); - (void) force_number(val); - if (strcmp(tmp->stptr, "NHAT") == 0) - NHAT = (int) val->numbr; - else - ret = NULL; - return ret; -} - - /* cint_print --- print structural info */ static void |