From 5721d15df645d19857d68b67273f9bcf625b76fd Mon Sep 17 00:00:00 2001 From: Andinus Date: Tue, 2 Nov 2021 13:31:59 +0530 Subject: Basic implementation of fornax --- fornax.raku | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 fornax.raku diff --git a/fornax.raku b/fornax.raku new file mode 100644 index 0000000..7cac53e --- /dev/null +++ b/fornax.raku @@ -0,0 +1,14 @@ +use Cairo; + +subset Directory of Str where *.IO.d; + +#| Collection of tools to visualize Path Finding Algorithms +unit sub MAIN( + Str $script, #= script to run (e.g. java/DFS) + Directory :$algorithms = 'algorithms/', #= algorithms directory +); + +my Str $interpreter = $script.split("/").first; +my IO() $program-path = $algorithms ~ $script ~ '.' ~ $interpreter; + +die "Program path invalid" unless $program-path.IO.f; -- cgit 1.4.1-2-gfad0