Determine if array can be stored contiguously

Author: kgryte

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

@@ -36,6 +36,7 @@
 				"@stdlib/ndarray/base/bytes-per-element",
 				"@stdlib/ndarray/base/dtype-char",
 				"@stdlib/ndarray/base/iteration-order",
+				"@stdlib/ndarray/base/minmax-view-buffer-index",
 				"@stdlib/ndarray/base/numel",
 				"@stdlib/ndarray/base/strides2order",
 				"@stdlib/ndarray/dtypes",

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

@@ -21,6 +21,7 @@
 #include "stdlib/ndarray/base/bytes_per_element.h"
 #include "stdlib/ndarray/base/dtype_char.h"
 #include "stdlib/ndarray/base/iteration_order.h"
+#include "stdlib/ndarray/base/minmax_view_buffer_index.h"
 #include "stdlib/ndarray/base/numel.h"
 #include "stdlib/ndarray/base/strides2order.h"
 #include "stdlib/ndarray/dtypes.h"
@@ -84,6 +85,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 contiguous;
+	uint64_t tmp[2];
 	uint8_t ord;
 
 	struct ndarray *arr = malloc( sizeof( struct ndarray ) );
@@ -108,6 +111,22 @@ struct ndarray * stdlib_ndarray_constructor( uint8_t *data, uint64_t ndims, int6
 	// Infer the array "order" from the stride array (this is supplementary to the `order` parameter):
 	ord = stdlib_ndarray_strides2order( ndims, strides );
 
+	// Determine if the array can be stored contiguously...
+	if ( arr->length == 0 || arr->_iterationOrder == 0 ) {
+		// If an array does not contain any elements, then no data to store, and, if the array is unordered, adjacent array elements are not guaranteed to be stored next to each other.
+		contiguous = 0;
+	} else {
+		// Ensure that the array is compatible with a single memory segment:
+		stdlib_ndarray_minmax_view_buffer_index( tmp, ndims, shape, strides, offset );
+		if ( arr->length == (tmp[1]-tmp[0]+1) ) {
+			// Compatible:
+			contiguous = 1;
+		} else {
+			// Incompatible:
+			contiguous = 0;
+		}
+	}
+
 	// TODO: compute flags
 
 	return arr;