diff options
| author | john haque <j.eh@mchsi.com> | 2012-02-26 06:57:48 -0600 |
|---|---|---|
| committer | john haque <j.eh@mchsi.com> | 2012-02-26 06:57:48 -0600 |
| commit | 1c06c5c6f0f6d46f63977dd7407d86ccc2614226 (patch) | |
| tree | 5763e51d36264e6f84a70e480d063b788c2f47cf /cint_array.c | |
| parent | cb17a712ea65f6510e0000374cce4efbf4ffb902 (diff) | |
| download | egawk-1c06c5c6f0f6d46f63977dd7407d86ccc2614226.tar.gz egawk-1c06c5c6f0f6d46f63977dd7407d86ccc2614226.tar.bz2 egawk-1c06c5c6f0f6d46f63977dd7407d86ccc2614226.zip | |
Finish MPFR changes and clean up code.
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 |