The kitchen-sink's discuss from raycatwhodat

raycatwhodat / kitchen-sink Goto Github PK

View Code? Open in Web Editor NEW

Everything but.

JavaScript 11.53% TypeScript 8.47% Common Lisp 2.84% Haxe 12.13% OCaml 0.76% Rust 11.22% Emacs Lisp 10.56% Julia 0.67% Red 9.78% Perl 0.39% Python 1.51% Scheme 1.27% Racket 2.40% C++ 2.49% D 5.00% Lua 8.37% Tcl 2.67% Shell 0.22% Nim 6.77% Dart 0.94%

kitchen-sink's Issues

ScryfallSearch.hx | Rewrite `ScryfallSearch`.

scryfall.js is ahead of the original Haxe implementation. Rewrite the Haxe implementation and export the new Node-based JS over the original.

get-files.lisp | Make it higher order so, you can do more than list files.

As mfiano said on the Lisp Discord, it would be better to make the function higher-order.

(defun map-files (path function &key (test (constantly t)) (recursive-p t))
  "Map over all files located in the directory of `PATH`, applying `FUNCTION` to each file's path.
`TEST` is a function that takes a file path and decides if `FUNCTION` should be applied to it.
`RECURSIVE-P`, when non-NIL will descend into sub-directories of `PATH` recursively."
  (labels ((process-files (dir)
             (map nil
                  (lambda (x)
                    (when (funcall test x)
                      (funcall function x)))
                  (uiop/filesystem:directory-files dir))))
    (uiop/filesystem:collect-sub*directories
     (uiop/pathname:ensure-directory-pathname path) t recursive-p #'process-files)))

Recommend Projects