From 72d2b2f8183e258f0ca3f458a22c96a8abe1df59 Mon Sep 17 00:00:00 2001 From: nodist Date: Sat, 6 Jun 2026 15:42:37 -0400 Subject: remove print op --- ack.kpl | 2 +- fib.kpl | 2 +- fib_import.kpl | 3 ++- 3 files changed, 4 insertions(+), 3 deletions(-) diff --git a/ack.kpl b/ack.kpl index 5aaa4c1..93cc8d8 100644 --- a/ack.kpl +++ b/ack.kpl @@ -28,5 +28,5 @@ "#BOLD#WHITE#Usage: % % #\n" `format (args `get 0; args `get 1) ) } - `print ack_string `sync (U64 $ args `get -2; U64 $ args `get -1) + ack_string `sync (U64 $ args `get -2; U64 $ args `get -1) ) diff --git a/fib.kpl b/fib.kpl index ef73647..afc44ee 100644 --- a/fib.kpl +++ b/fib.kpl @@ -33,5 +33,5 @@ "#BOLD#WHITE#Usage: % % #\n" `format (args `get 0; args `get 1) ) } - `print fib_string `sync U64 $ args `get -1 + fib_string `sync U64 $ args `get -1 ) diff --git a/fib_import.kpl b/fib_import.kpl index d5a73bb..0c51fec 100644 --- a/fib_import.kpl +++ b/fib_import.kpl @@ -1,8 +1,9 @@ // Import and run fib_string function +( write; stdout ) : `use "io" ( fib_string ) : `import "./fib.kpl" @ 0 .. 30 {[n] - `print fib_string `sync n + write `sync (stdout; fib_string `sync n) } -- cgit v1.2.3