Infer order from strides array

Author: kgryte

lib/node_modules/@stdlib/ndarray/ctor/manifest.json

@@ -37,6 +37,7 @@
 				"@stdlib/ndarray/base/dtype-char",
 				"@stdlib/ndarray/base/iteration-order",
 				"@stdlib/ndarray/base/numel",
+				"@stdlib/ndarray/base/strides2order",
 				"@stdlib/ndarray/dtypes",
 				"@stdlib/ndarray/orders"
 			]

lib/node_modules/@stdlib/ndarray/ctor/src/ndarray.c

@@ -24,6 +24,7 @@
 #include "stdlib/ndarray_iteration_order.h"
 #include "stdlib/ndarray_numel.h"
 #include "stdlib/ndarray_orders.h"
+#include "stdlib/ndarray_strides2order.h"
 #include "stdlib/ndarray.h"
 
 /**
@@ -83,6 +84,8 @@
 * free( x );
 */
 struct ndarray * stdlib_ndarray_constructor( uint8_t *data, uint64_t ndims, int64_t *shape, int64_t *strides, uint64_t offset, enum STDLIB_NDARRAY_ORDER order, enum STDLIB_NDARRAY_DTYPE dtype ) {
+	uint8_t ord;
+
 	struct ndarray *arr = malloc( sizeof( struct ndarray ) );
 	if ( arr == NULL ) {
 		return NULL;
@@ -102,6 +105,9 @@ struct ndarray * stdlib_ndarray_constructor( uint8_t *data, uint64_t ndims, int6
 	arr->ltr = stdlib_ndarray_dtype_char( dtype );
 	arr->_iterationOrder = stdlib_ndarray_iteration_order( ndims, strides );
 
+	// Infer the array "order" from the stride array (this is supplementary to the `order` parameter):
+	ord = stdlib_ndarray_strides2order( ndims, strides );
+
 	// TODO: compute flags
 
 	return arr;