Convert some classes to records

Author: 7h3kk1d

README.md

@@ -672,24 +672,15 @@ There are three functions that lambda provides that interface directly with lens
 Lenses can be easily created. Consider the following `Person` class:
 
 ```Java
-public final class Person {
-    private final int age;
+public record Person(int age) {
 
-    public Person(int age) {
-        this.age = age;
-    }
-
-    public int getAge() {
-        return age;
-    }
+   public Person setAge(int age) {
+      return new Person(age);
+   }
 
-    public Person setAge(int age) {
-        return new Person(age);
-    }
-
-    public Person setAge(LocalDate dob) {
-        return setAge((int) YEARS.between(dob, LocalDate.now()));
-    }
+   public Person setAge(LocalDate dob) {
+      return setAge((int) YEARS.between(dob, LocalDate.now()));
+   }
 }
 ```
 

src/main/java/com/jnape/palatable/lambda/functor/builtin/Exchange.java

@@ -12,20 +12,15 @@
  * @param <S> the larger viewing value of an {@link Iso}
  * @param <T> the larger viewed value of an {@link Iso}
  */
-public final class Exchange<A, B, S, T> implements Profunctor<S, T, Exchange<A, B, ?, ?>> {
-    private final Fn1<? super S, ? extends A> sa;
-    private final Fn1<? super B, ? extends T> bt;
-
-    public Exchange(Fn1<? super S, ? extends A> sa, Fn1<? super B, ? extends T> bt) {
-        this.sa = sa;
-        this.bt = bt;
-    }
+public record Exchange<A, B, S, T>(Fn1<? super S, ? extends A> sa,
+                                   Fn1<? super B, ? extends T> bt) implements Profunctor<S, T, Exchange<A, B, ?, ?>> {
 
     /**
      * Extract the mapping <code>S -&gt; A</code>.
      *
      * @return an <code>{@link Fn1}&lt;S, A&gt;</code>
      */
+    @Override
     public Fn1<? super S, ? extends A> sa() {
         return sa;
     }
@@ -35,6 +30,7 @@ public Exchange(Fn1<? super S, ? extends A> sa, Fn1<? super B, ? extends T> bt)
      *
      * @return an <code>{@link Fn1}&lt;B, T&gt;</code>
      */
+    @Override
     public Fn1<? super B, ? extends T> bt() {
         return bt;
     }

src/main/java/com/jnape/palatable/lambda/functor/builtin/Market.java

@@ -28,13 +28,10 @@
  * @param <S> the input that might fail to map to its output
  * @param <T> the guaranteed output
  */
-public final class Market<A, B, S, T> implements
+public record Market<A, B, S, T>(Fn1<? super B, ? extends T> bt, Fn1<? super S, ? extends Either<T, A>> sta) implements
         MonadRec<T, Market<A, B, S, ?>>,
         Cocartesian<S, T, Market<A, B, ?, ?>> {
 
-    private final Fn1<? super B, ? extends T>            bt;
-    private final Fn1<? super S, ? extends Either<T, A>> sta;
-
     public Market(Fn1<? super B, ? extends T> bt, Fn1<? super S, ? extends Either<T, A>> sta) {
         this.bt = fn1(bt);
         this.sta = fn1(sta);
@@ -45,6 +42,7 @@ public Market(Fn1<? super B, ? extends T> bt, Fn1<? super S, ? extends Either<T,
      *
      * @return a <code>{@link Fn1}&lt;B, T&gt;</code>
      */
+    @Override
     public Fn1<? super B, ? extends T> bt() {
         return bt;
     }
@@ -54,6 +52,7 @@ public Market(Fn1<? super B, ? extends T> bt, Fn1<? super S, ? extends Either<T,
      *
      * @return a <code>{@link Fn1}&lt;S, {@link Either}&lt;T, A&gt;&gt;</code>
      */
+    @Override
     public Fn1<? super S, ? extends Either<T, A>> sta() {
         return sta;
     }
@@ -72,9 +71,9 @@ public <U> Market<A, B, S, U> pure(U u) {
     @Override
     public <U> Market<A, B, S, U> flatMap(Fn1<? super T, ? extends Monad<U, Market<A, B, S, ?>>> f) {
         return new Market<>(b -> f.apply(bt().apply(b)).<Market<A, B, S, U>>coerce().bt().apply(b),
-                            s -> sta().apply(s).invert()
-                                    .flatMap(t -> f.apply(t).<Market<A, B, S, U>>coerce().sta()
-                                            .apply(s).invert()).invert());
+                s -> sta().apply(s).invert()
+                        .flatMap(t -> f.apply(t).<Market<A, B, S, U>>coerce().sta()
+                                .apply(s).invert()).invert());
     }
 
     /**
@@ -89,7 +88,7 @@ public <U> Market<A, B, S, U> trampolineM(
                         trampoline(t -> fn.apply(t).<Market<A, B, S, RecursiveResult<T, U>>>coerce()
                                 .sta.apply(s)
                                 .match(tOrU -> tOrU.match(RecursiveResult::recurse, u -> terminate(left(u))),
-                                       a -> terminate(right(a)))),
+                                        a -> terminate(right(a)))),
                         Either::right)));
         return new Market<>(bu, sua);
     }
@@ -101,7 +100,7 @@ public <U> Market<A, B, S, U> trampolineM(
     public <U> Market<A, B, S, U> zip(Applicative<Fn1<? super T, ? extends U>, Market<A, B, S, ?>> appFn) {
         Market<A, B, S, Fn1<? super T, ? extends U>> marketF = appFn.coerce();
         return new Market<>(b -> marketF.bt().apply(b).apply(bt().apply(b)),
-                            s -> sta().apply(s).invert().zip(marketF.sta().apply(s).invert()).invert());
+                s -> sta().apply(s).invert().zip(marketF.sta().apply(s).invert()).invert());
     }
 
     /**
@@ -118,8 +117,8 @@ public <U> Market<A, B, S, U> fmap(Fn1<? super T, ? extends U> fn) {
     @Override
     public <C> Market<A, B, Choice2<C, S>, Choice2<C, T>> cocartesian() {
         return new Market<>(bt.fmap(Choice2::b),
-                            cs -> cs.fmap(sta).match(c -> left(a(c)),
-                                                     tOrA -> tOrA.match(t -> left(b(t)), Either::right)));
+                cs -> cs.fmap(sta).match(c -> left(a(c)),
+                        tOrA -> tOrA.match(t -> left(b(t)), Either::right)));
     }
 
     /**

src/test/java/testsupport/assertion/PrismAssert.java

@@ -59,29 +59,19 @@ private static <S, A, X> Maybe<String> falsify(String label, Fn2<S, A, X> l, Fn2
                 .apply(cases);
     }
 
-    private static final class PrismResult<S> {
-        private final Maybe<S> maybeS;
-
-        private PrismResult(Maybe<S> maybeS) {
-            this.maybeS = maybeS;
-        }
+    private record PrismResult<S>(Maybe<S> maybeS) {
 
         @Override
-        public boolean equals(Object other) {
-            if (other instanceof PrismResult) {
-                return maybeS.zip(((PrismResult<?>) other).maybeS.fmap(fn2(Objects::equals))).orElse(true);
+            public boolean equals(Object other) {
+                if (other instanceof PrismResult) {
+                    return maybeS.zip(((PrismResult<?>) other).maybeS.fmap(fn2(Objects::equals))).orElse(true);
+                }
+                return false;
             }
-            return false;
-        }
-
-        @Override
-        public int hashCode() {
-            return Objects.hash(maybeS);
-        }
 
         @Override
-        public String toString() {
-            return maybeS.toString();
+            public String toString() {
+                return maybeS.toString();
+            }
         }
-    }
 }