diff options
| -rw-r--r-- | fib.kpl | 8 | ||||
| -rw-r--r-- | fib_import.kpl | 9 |
2 files changed, 15 insertions, 2 deletions
@@ -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; " <number>\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 ) diff --git a/fib_import.kpl b/fib_import.kpl new file mode 100644 index 0000000..d6333d5 --- /dev/null +++ b/fib_import.kpl @@ -0,0 +1,9 @@ + +// Import and run fib_string function + +( print ) : `use "io" +( fib_string ) : `import "./fib.kpl" + +@ 0 .. 30 { + print `call_sync fib_string `call_sync n +}[n] |
