eigenhombre / cl-oju

Some Clojure-ish thingies for Common Lisp

Hello!

I’m currently working on personal tech projects (this site!), my painting/drawing practice, and software development for the IceCube Neutrino Observatory. See the Now Page on my Website for more info. You can reach me through my Website.

cl-oju's Issues

`group-by` tests fail on ECL

This is in Docker on my Mac

#16 14.01 CL-OJU-TESTS::GROUP-BY-TEST.An error occurred during initialization:
#16 14.01 The assertion (EQUAL
#16 14.01                (CL-OJU:GROUP-BY
#16 14.01                 (LAMBDA (CL-OJU-TESTS::X) (NTH 5 CL-OJU-TESTS::X))
#16 14.01                 '((1 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                    CL-OJU-TESTS::_ "x")
#16 14.01                   (2 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                    CL-OJU-TESTS::_ "y")
#16 14.01                   (3 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                    CL-OJU-TESTS::_ "x")
#16 14.01                   (4 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                    CL-OJU-TESTS::_ "y")
#16 14.01                   (5 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                    CL-OJU-TESTS::_ "x")
#16 14.01                   (6 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                    CL-OJU-TESTS::_ "y")))
#16 14.01                '(("x"
#16 14.01                   ((5 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                     CL-OJU-TESTS::_ "x")
#16 14.01                    (3 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                     CL-OJU-TESTS::_ "x")
#16 14.01                    (1 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                     CL-OJU-TESTS::_ "x")))
#16 14.01                  ("y"
#16 14.01                   ((6 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                     CL-OJU-TESTS::_ "y")
#16 14.01                    (4 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                     CL-OJU-TESTS::_ "y")
#16 14.01                    (2 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                     CL-OJU-TESTS::_ "y"))))) failed.
#16 14.01 make: *** [Makefile:7: test-ecl] Error 1

Don't namespace-qualify all the things in the unit tests

Remove cl-oju:: prefix everywhere and fix the necessary requires

group-by tests fail on ECL

This is in Docker on my Mac

#16 14.01 CL-OJU-TESTS::GROUP-BY-TEST.An error occurred during initialization:
#16 14.01 The assertion (EQUAL
#16 14.01                (CL-OJU:GROUP-BY
#16 14.01                 (LAMBDA (CL-OJU-TESTS::X) (NTH 5 CL-OJU-TESTS::X))
#16 14.01                 '((1 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                    CL-OJU-TESTS::_ "x")
#16 14.01                   (2 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                    CL-OJU-TESTS::_ "y")
#16 14.01                   (3 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                    CL-OJU-TESTS::_ "x")
#16 14.01                   (4 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                    CL-OJU-TESTS::_ "y")
#16 14.01                   (5 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                    CL-OJU-TESTS::_ "x")
#16 14.01                   (6 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                    CL-OJU-TESTS::_ "y")))
#16 14.01                '(("x"
#16 14.01                   ((5 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                     CL-OJU-TESTS::_ "x")
#16 14.01                    (3 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                     CL-OJU-TESTS::_ "x")
#16 14.01                    (1 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                     CL-OJU-TESTS::_ "x")))
#16 14.01                  ("y"
#16 14.01                   ((6 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                     CL-OJU-TESTS::_ "y")
#16 14.01                    (4 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                     CL-OJU-TESTS::_ "y")
#16 14.01                    (2 CL-OJU-TESTS::_ CL-OJU-TESTS::_ CL-OJU-TESTS::_
#16 14.01                     CL-OJU-TESTS::_ "y"))))) failed.
#16 14.01 make: *** [Makefile:7: test-ecl] Error 1

Fix `sort-by` to work with conses (lists)

sort-by should work like Clojure's. That means implementing comparisons a little differently.

Clean up and simplify testing

... allow for easier testing at the REPL

Add `if-not` and `when-not`.

Add ECL to CI build

Generic Map?

Thoughts on adding a generic map similar to map from clojure? I've seen some call it fmap (the haskell naming) and figure it would be a pretty easy addition.

usage

(fmap #'1+ '(1 2 3 4))

Review MVR checklist

From https://gist.github.com/eigenhombre/204400c786f9dba3a8d3193d3ce1542a:

• LICENSE file
• Automated build via Docker and GitHub Actions
• Build badge
• Artwork
• Versioned
• Minimum snippet / example
• Link to API and/or help output
• Project available in public package manager (want Quicklisp, issue filed there; but, Ultralisp works)
• Track outstanding TODOs in Issues

add `not=`

I seem to want this one every day.