From 1255e343c24af52279cc78b2e2c7879dd1995ed1 Mon Sep 17 00:00:00 2001 From: Nakidai Date: Tue, 15 Apr 2025 16:37:59 +0300 Subject: Add cat.ccl example --- examples/cat.ccl | 7 +++++++ 1 file changed, 7 insertions(+) create mode 100644 examples/cat.ccl (limited to 'examples/cat.ccl') 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 +