add parent pointer to memory pool blocks

Author: NotAPenguin0

include/pscript/memory.hpp

@@ -3,6 +3,7 @@
 #include <cstddef>
 #include <memory>
 #include <array>
+#include <unordered_map>
 
 namespace ps {
 
@@ -108,7 +109,7 @@ class memory_pool {
     std::size_t mem_size = 0;
 
     static constexpr inline std::size_t min_block_size = 16;
-    static constexpr inline std::size_t small_block_cache_size = 8;
+    static constexpr inline std::size_t small_block_cache_size = 32;
 
     /**
      * @brief Represents a block in the buddy allocator.
@@ -122,6 +123,7 @@ class memory_pool {
 
         std::unique_ptr<block> left = nullptr;
         std::unique_ptr<block> right = nullptr;
+        block* parent = nullptr;
     };
 
     // Root block is the initial block and represents the full memory range.

src/bench/main.cpp

@@ -37,7 +37,7 @@ std::string read_file(fs::path const& path) {
 }
 
 int main() {
-    constexpr std::size_t iterations = 100;
+    constexpr std::size_t iterations = 50;
 
     std::cout << std::setprecision(4);
     std::cout << "Benchmark\t\t||\t\tAverage runtime (milliseconds)\n";

src/pscript/memory.cpp

@@ -185,11 +185,13 @@ bool memory_pool::free_block(block* root, block* parent, ps::pointer ptr) {
     b->left = std::make_unique<block>();
     b->left->ptr = b->ptr;
     b->left->size = new_size;
+    b->left->parent = b;
 
     // Right block starts at same pointer but offset for left block, with all leftover bytes.
     b->right = std::make_unique<block>();
     b->right->ptr = b->ptr + new_size;
     b->right->size = b->size - new_size;
+    b->right->parent = b;
 
     return true;
 }

tests/main.cpp

@@ -1046,4 +1046,13 @@ TEST_CASE("range-for") {
         ps::script script(source, ctx);
         ctx.execute(script);
     }
-}
+}
+
+// PROFILING RESULTS
+/*
+ * Currently, slow parts of the interpreter are
+ * free_block()
+ * node_is_type() -> Use string interning of some sorts so we dont compare string types all the time
+ * verify_pointer_throw()
+ * find_child_with_type() -> Same as node_is_type()
+ */