/* * return array element pointer */ var_t *v_getelemptr(var_t *v, dword index) { if (v->type == V_ARRAY) { if (index < v->v.a.size) { return v_elem(v, index); } else { err_vararridx(index, v->v.a.size); return NULL; } } err_varisnotarray(); return NULL; }
var_t *v_getelemptr(var_t *v, dword index) #endif { if (v->type == V_ARRAY) { if (index < v->v.a.size) return (var_t *) (v->v.a.ptr + (index * sizeof(var_t))); else { err_vararridx(index, v->v.a.size); return NULL; } } err_varisnotarray(); return NULL; }