diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2018-09-26 16:26:25 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2018-09-26 16:26:25 +0300 |
| commit | c25c88f583c984112055fa091d357c1b8538d5d8 (patch) | |
| tree | a971b8150c89a3f00e816c14bfc6cacb2f96c1d4 /interpret.h | |
| parent | 26b1a15e75cc1d134e8b52b0df9a5d1365e66d8f (diff) | |
| download | egawk-c25c88f583c984112055fa091d357c1b8538d5d8.tar.gz egawk-c25c88f583c984112055fa091d357c1b8538d5d8.tar.bz2 egawk-c25c88f583c984112055fa091d357c1b8538d5d8.zip | |
Add more lint warnings.
Diffstat (limited to 'interpret.h')
| -rw-r--r-- | interpret.h | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/interpret.h b/interpret.h index fed0078c..4381a929 100644 --- a/interpret.h +++ b/interpret.h @@ -248,7 +248,7 @@ uninitialized_scalar: case Op_subscript: t2 = mk_sub(pc->sub_count); - t1 = POP_ARRAY(); + t1 = POP_ARRAY(false); if (do_lint && in_array(t1, t2) == NULL) { t2 = force_string(t2); @@ -295,7 +295,7 @@ uninitialized_scalar: case Op_sub_array: t2 = mk_sub(pc->sub_count); - t1 = POP_ARRAY(); + t1 = POP_ARRAY(false); r = in_array(t1, t2); if (r == NULL) { r = make_array(); @@ -321,7 +321,7 @@ uninitialized_scalar: case Op_subscript_lhs: t2 = mk_sub(pc->sub_count); - t1 = POP_ARRAY(); + t1 = POP_ARRAY(false); if (do_lint && in_array(t1, t2) == NULL) { t2 = force_string(t2); if (pc->do_reference) @@ -884,19 +884,19 @@ mod: break; case Op_K_delete: - t1 = POP_ARRAY(); + t1 = POP_ARRAY(false); do_delete(t1, pc->expr_count); stack_adj(-pc->expr_count); break; case Op_K_delete_loop: - t1 = POP_ARRAY(); + t1 = POP_ARRAY(false); lhs = POP_ADDRESS(); /* item */ do_delete_loop(t1, lhs); break; case Op_in_array: - t1 = POP_ARRAY(); + t1 = POP_ARRAY(false); t2 = mk_sub(pc->expr_count); r = node_Boolean[(in_array(t1, t2) != NULL)]; DEREF(t2); @@ -915,7 +915,7 @@ mod: bool saved_end = false; /* get the array */ - array = POP_ARRAY(); + array = POP_ARRAY(true); /* sanity: check if empty */ num_elems = assoc_length(array); |