From 1255e343c24af52279cc78b2e2c7879dd1995ed1 Mon Sep 17 00:00:00 2001
From: Nakidai <nakidai@disroot.org>
Date: Tue, 15 Apr 2025 16:37:59 +0300
Subject: Add cat.ccl example

---
 examples/Makefile |  1 +
 examples/cat.ccl  |  7 +++++++
 examples/in/cat   |  5 +++++
 examples/out/cat  | 10 ++++++++++
 4 files changed, 23 insertions(+)
 create mode 100644 examples/cat.ccl
 create mode 100644 examples/in/cat
 create mode 100644 examples/out/cat

diff --git a/examples/Makefile b/examples/Makefile
index ee0946a..ae9337f 100644
--- a/examples/Makefile
+++ b/examples/Makefile
@@ -1,3 +1,4 @@
+TESTS += cat
 TESTS += cnt
 TESTS += fac
 TESTS += fib
diff --git a/examples/cat.ccl b/examples/cat.ccl
new file mode 100644
index 0000000..2f4028f
--- /dev/null
+++ b/examples/cat.ccl
@@ -0,0 +1,7 @@
+^=c / create variable for storing input
+^- / push -1 (EOF) on the stack
+_ (
+    >c   / input
+    c?#; / if c is -1 then exit
+    <c   / output
+)
diff --git a/examples/in/cat b/examples/in/cat
new file mode 100644
index 0000000..b1dcb20
--- /dev/null
+++ b/examples/in/cat
@@ -0,0 +1,5 @@
+this is
+the test
+let us also take
+maybe some
+кириллица :3
diff --git a/examples/out/cat b/examples/out/cat
new file mode 100644
index 0000000..bf661e9
--- /dev/null
+++ b/examples/out/cat
@@ -0,0 +1,10 @@
+this is
+the test
+let us also take
+maybe some
+кириллица :3
+Globals:
+  c=-1
+Functions:
+Stack:
+  -1
-- 
cgit 1.4.1