Fix anagram unit test for Base v0.12.0

[citizen428]

Today I spent way too much time looking for an error in my own code before I realized it actually came from the unit test 🤦‍♂️

Here's the error:

File "test.ml", line 7, characters 47-59:
Error: The function applied to this argument has type
         ('a -> 'a -> bool) -> 'a list -> 'a list -> bool

Coming from the following line:

assert_equal exp got ~cmp:(List.equal ~equal:String.equal) ~printer

This can be fixed either by using

assert_equal exp got ~cmp:(List.equal String.equal) ~printer

or by just leaving off ~cmp: completely:

assert_equal exp got ~printer

Looking at Base's changelog, the following seems to be the culprit:

• Changed the signature of equal from 'a t -> 'a t -> equal:('a -> 'a -> bool) -> bool to ('a -> 'a -> bool) -> 'a t -> 'a t -> bool.

[sshine]

OK, excellent. You don't need to force push, since GitHub lets me squash merge.

[citizen428]

You don't need to force push, since GitHub lets me squash merge.

I know, but I've seen too many people forget about it and since I'm gonna delete my fork anyway I generally err on the side of caution. 😃