Lines Matching defs:rank
1351 if (object->data.array.rank == 0) {
1360 if (object->data.array.rank == 1)
1365 format_integer(stk, object->data.array.rank, 10);
1374 if (object->data.array.rank == 1) {
1398 int i, k, rank, *dims, *loop;
1400 rank = object->data.array.rank;
1401 dims = LispMalloc(sizeof(int) * rank);
1402 loop = LispCalloc(1, sizeof(int) * (rank - 1));
1414 for (; i < rank - 1; i++)
1425 for (k = 0; k < dims[rank - 1] - 1;
1444 for (k = rank - 1; k > i; k--)