alloc/arena: add simple test cases

Makefile.am

@@ -398,6 +398,7 @@ AM_LDFLAGS  += $(BOOST_LDFLAGS) $(BOOST_FILESYSTEM_LIB) $(BOOST_SYSTEM_LIB)
 AM_CXXFLAGS += -I$(top_srcdir)
 
 TEST_BIN = 			\
+    test/alloc/arena		\
     test/alloc/stack		\
     test/alloc/linear		\
     test/backtrace 		\

test/alloc/arena.cpp

@@ -0,0 +1,56 @@
+#include "tap.hpp"
+#include "alloc/arena.hpp"
+#include "alloc/linear.hpp"
+
+
+static char g_backing[1024*1024];
+
+
+struct setter {
+    setter (bool &_target):
+        target (_target)
+    { target = false; }
+
+    ~setter ()
+    { target = true; }
+
+    bool ⌖
+};
+
+
+int
+main (void)
+{
+    util::alloc::linear alloc (std::begin (g_backing), std::end (g_backing));
+    util::alloc::arena<util::alloc::linear>  arena (alloc);
+
+    util::TAP::logger tap;
+
+    bool flag = true;
+
+    // double check our testing object is working, because I'm tired and stupid
+    {
+        auto val = setter (flag);
+        CHECK (!flag);
+    }
+    CHECK (flag);
+
+    // ensure manual acquire and release calls constructors and destructors
+    {
+        auto obj = arena.acquire<setter> (flag);
+        tap.expect_eq (flag, false, "arena manual acquire calls constructor");
+
+        arena.release (obj);
+        tap.expect_eq (flag, true, "arena manual release calls destructor");
+    }
+
+    // ensure unique_ptr like objects call constructors and destructors
+    {
+        auto obj = arena.unique<setter> (flag);
+        tap.expect_eq (flag, false, "arena unique acquire calls constructor");
+    }
+
+    tap.expect_eq (flag, true, "arena unique release calls destructor");
+
+    return tap.status ();
+}