array: New function reverse_array().

[pspp] / src / libpspp / array.c

diff --git a/src/libpspp/array.c b/src/libpspp/array.c
index f37270c81da9796320de8507cb097a80ceca6869..9995cf3b628f6de2840d798a383887f28985f6da 100644 (file)
--- a/src/libpspp/array.c
+++ b/src/libpspp/array.c
@@ -1027,3 +1027,18 @@ is_heap (const void *array, size_t count, size_t size,
   return true;
 }
 
+/* Reverses the order of ARRAY, which contains COUNT elements of SIZE bytes
+   each. */
+void
+reverse_array (void *array_, size_t count, size_t size)
+{
+  uint8_t *array = array_;
+  uint8_t *first = array;
+  uint8_t *last = array + (count - 1) * size;
+  for (size_t i = 0; i < count / 2; i++)
+    {
+      swap (first, last, size);
+      first += size;
+      last -= size;
+    }
+}