Sorting Primitives into the OT

Started to add some ergonomic definitions into duffle.

code/duffle/farena.h

@@ -0,0 +1,31 @@
+#ifdef INTELLISENSE_DIRECTIVES
+#	pragma once
+#	include "dsl.h"
+#	include "memory.h"
+#	include "strings.h"
+#endif
+
+typedef def_struct(Opts_farena) {
+	Str8  type_name;
+	SSIZE alignment;
+};
+typedef def_struct(FArena) {
+	void* start;
+	SSIZE capacity;
+	SSIZE used;
+};
+FArena      farena_make  (Slice_BYTE mem);
+void        farena_init  (FArena* arena, Slice_BYTE byte);
+Slice_BYTE  farena__push (FArena* arena, SSIZE amount, SSIZE type_width, Opts_farena* opts);
+void        farena_reset (FArena* arena);
+void        farena_rewind(FArena* arena, AllocatorSP save_point);
+AllocatorSP farena_save  (FArena  arena);
+
+// void farena_allocator_proc(AllocatorProc_In in, AllocatorProc_Out* out);
+// #define ainfo_farena(arena) (AllocatorInfo){ .proc = farena_allocator_proc, .data = & arena }
+
+#define farena_push(arena, type, ...) \
+cast(type*, farena__push(arena, size_of(type), 1, opt_args(Opts_farena_push, lit(stringify(type)), __VA_ARGS__))).ptr
+
+#define farena_push_array(arena, type, amount, ...) \
+(Slice ## type){ farena__push(arena, size_of(type), amount, opt_args(Opts_farena_push, lit(stringify(type)), __VA_ARGS__)).ptr, amount }