|
@@ -967,7 +967,7 @@ bool is_arrays_array(list_t *a) {
|
|
|
return true;
|
|
|
}
|
|
|
|
|
|
-bool nonar(list_t *a) {
|
|
|
+bool is_not_arrays_array(list_t *a) {
|
|
|
if (!a->data)
|
|
|
return true;
|
|
|
|
|
@@ -981,7 +981,7 @@ bool nonar(list_t *a) {
|
|
|
return true;
|
|
|
}
|
|
|
|
|
|
-bool matp(list_t *a) {
|
|
|
+bool is_matrix(list_t *a) {
|
|
|
if (a->length < 2)
|
|
|
return false;
|
|
|
|
|
@@ -993,7 +993,7 @@ bool matp(list_t *a) {
|
|
|
value_t *v = a->data[i];
|
|
|
|
|
|
if (v->tag != ARRAY || v->val.array->length != rwl ||
|
|
|
- !nonar(v->val.array) || is_char_array(v->val.array))
|
|
|
+ !is_not_arrays_array(v->val.array) || is_char_array(v->val.array))
|
|
|
return false;
|
|
|
}
|
|
|
|
|
@@ -1043,7 +1043,7 @@ char *show_array(value_t *v) {
|
|
|
if (i != t->length - 1)
|
|
|
buffer_append(buf, ' ');
|
|
|
}
|
|
|
- else if (matp(t)) {
|
|
|
+ else if (is_matrix(t)) {
|
|
|
size_t rwl = 0;
|
|
|
size_t pad = 0;
|
|
|
size_t padl = 0;
|