From a46670f5100e6ac5e39e52d2168b754e9d614bca Mon Sep 17 00:00:00 2001 From: nodist Date: Tue, 9 Jun 2026 10:32:54 -0400 Subject: inline fn defs --- fib.kpl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'fib.kpl') diff --git a/fib.kpl b/fib.kpl index 18d074c..314dc83 100644 --- a/fib.kpl +++ b/fib.kpl @@ -4,7 +4,7 @@ n can be any numeric type */ -`export fib : Fn[n] $ ( +`export fib : ([x] t : `type n ? { |(t = Int_signed; t = Float) { @@ -21,11 +21,11 @@ } ) -`export fib_string Fn[n] $ ( +`export fib_string : ([n] "#MAGENTA#fib#(#CYAN#%#) #WHITE#=# #GREEN#%#\n" `format (n; fib `sync n) ) -`is_main Fn $ ( +`is_main ([] `use "sys" [args] ? 3 != `length args { `return `error String $ ( -- cgit v1.2.3