From eff2145f5726c017e6e45a409f40c31c60b21d48 Mon Sep 17 00:00:00 2001 From: nodist Date: Sun, 17 May 2026 15:43:13 -0400 Subject: import example --- fib.kpl | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) (limited to 'fib.kpl') diff --git a/fib.kpl b/fib.kpl index 4b7fb15..a0d7255 100644 --- a/fib.kpl +++ b/fib.kpl @@ -9,6 +9,11 @@ } ) + +`export fib_string Fn[n] $ ( + String $ ("fib("; n; ") = "; fib `call_sync n; "\n") +) + `is_main Fn $ ( ( args ) : `use "sys" ? 3 != `length args { @@ -17,7 +22,6 @@ "Usage: "; args `get 0; " "; args `get 1; " \n" ) } - n : I64 $ args `get -1 ( print ) : `use "io" - print `call_sync String $ ("fib("; n; ") = "; fib `call_sync n; "\n") + print `call_sync fib_string `call_sync I64 $ args `get -1 ) -- cgit v1.2.3