diff options
| author | nodist <kevin.comas.git@gmail.com> | 2026-06-06 16:04:12 -0400 |
|---|---|---|
| committer | nodist <kevin.comas.git@gmail.com> | 2026-06-06 16:04:12 -0400 |
| commit | 2df0f33fa89d4cd3d7378e1e8bd91d9e6e4c6936 (patch) | |
| tree | cb98d990c9d24505123529429c16e5832c559cd7 | |
| parent | 72d2b2f8183e258f0ca3f458a22c96a8abe1df59 (diff) | |
return result for is_main
| -rw-r--r-- | ack.kpl | 4 | ||||
| -rw-r--r-- | fib.kpl | 2 |
2 files changed, 3 insertions, 3 deletions
@@ -3,7 +3,7 @@ `export ack : Fn[m; n] $ ( t : `type m; - ? |(t != `type n) { + ? t != `type n { `panic "m and n must be the same type" } ? |(t = Int_signed; t = Float) { @@ -28,5 +28,5 @@ "#BOLD#WHITE#Usage: % % <m> <n>#\n" `format (args `get 0; args `get 1) ) } - ack_string `sync (U64 $ args `get -2; U64 $ args `get -1) + `value ack_string `sync (U64 $ args `get -2; U64 $ args `get -1) ) @@ -33,5 +33,5 @@ "#BOLD#WHITE#Usage: % % <n>#\n" `format (args `get 0; args `get 1) ) } - fib_string `sync U64 $ args `get -1 + `value fib_string `sync U64 $ args `get -1 ) |
