Renamed `Concatenate` to `Append` to match Scheme function naming

1 files changed, 27 insertions, 0 deletions

diff --git a/src/list/operation/append.h b/src/list/operation/append.h
new file mode 100644
index 0000000..9e1be79
--- /dev/null
+++ b/src/list/operation/append.h
@@ -0,0 +1,27 @@
+#ifndef TYPEASVALUE_SRC_LIST_OPERATION_APPEND_H_
+#define TYPEASVALUE_SRC_LIST_OPERATION_APPEND_H_
+
+namespace tav {
+
+template <
+	typename Primary,
+	typename Secondary
+>
+struct Append {
+	typedef Cons<
+		Head<Primary>,
+		typename Append<
+			Tail<Primary>,
+			Secondary
+		>::type
+	> type;
+};
+
+template <typename Secondary>
+struct Append<void, Secondary> {
+	typedef Secondary type;
+};
+
+}
+
+#endif  // TYPEASVALUE_SRC_LIST_OPERATION_APPEND_H_