feat(src/StringConsumer): Add higher order consumers, integer, binary operation and if keywords consumers HEAD main

Higher order consumers are called that way because they use other (base)
consumers in their logic. In a sense, the other consumers are parameters
to the higher order consumers.

1 files changed, 11 insertions, 0 deletions

diff --git a/src/StringConsumer/IHigherOrderConsumer.cl b/src/StringConsumer/IHigherOrderConsumer.cl
new file mode 100644
index 0000000..e7325d2
--- /dev/null
+++ b/src/StringConsumer/IHigherOrderConsumer.cl
@@ -0,0 +1,11 @@
+class IHigherOrderConsumer inherits IStringConsumer {
+	token: IToken;
+
+	token() : IToken {
+		token
+	};
+
+	did(length: Int) : Bool {
+		0 < (consumed_length <- consumed_length + length)
+	};
+};