GV

GeezerVison

The World Wide Web, restored to 800 pixels of glory.

Home|About|Gaming cabinet|Archives|How it works|Starter sites

On this site

  • Sign in
  • ActionsCI/CD and automation
  • CodespacesCloud development environments
  • All Features
  • Documentation
  • Training
  • Certifications
  • Build with Copilot
  • Customize Copilot
  • Integrations
  • Trending repos
  • GitHub Sponsors
  • Developer articles
  • Enterprises

This view

  • Original page
  • New address

GeezerVison is showing github.com — Fix #287: Add semigroup constraint to List.traverseValidation · lovejavaee/functionaljava@9c28f6f

File tree

Expand file treeCollapse file tree
Open diff view settings
Filter options
  • core/src/main/java/fj/data
    • List.java
    • optic
      • PIso.java
      • PLens.java
      • POptional.java
      • PPrism.java
      • PTraversal.java
      • Traversal.java
Expand file treeCollapse file tree
Open diff view settings
Collapse file

‎core/src/main/java/fj/data/List.java‎

Copy file name to clipboardExpand all lines: core/src/main/java/fj/data/List.java
+5-6Lines changed: 5 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -10,6 +10,7 @@
1010
import fj.Ordering;
1111
import fj.P;
1212
import fj.P1;
13+
import fj.Semigroup;
1314
import fj.Show;
1415
import fj.Unit;
1516
import fj.P2;
@@ -676,10 +677,8 @@ public final <B> List<List<B>> traverseList(final F<A, List<B>> f) {
676677
single(List.nil()));
677678
}
678679

679-
public final <E, B> Validation<E, List<B>> traverseValidation(final F<A, Validation<E, B>> f) {
680-
return foldRight(
681-
(a, acc) -> f.f(a).bind(b -> acc.map(bs -> bs.cons(b))),
682-
Validation.success(List.nil()));
680+
public final <E, B> Validation<E, List<B>> traverseValidation(Semigroup<E> s, final F<A, Validation<E, B>> f) {
681+
return Validation.sequence(s, map(f));
683682
}
684683

685684
public final <B> V2<List<B>> traverseV2(final F<A, V2<B>> f) {
@@ -2166,8 +2165,8 @@ public F<List<A>, P1<List<B>>> modifyP1F(F<A, P1<B>> f) {
21662165
}
21672166

21682167
@Override
2169-
public <E> F<List<A>, Validation<E, List<B>>> modifyValidationF(F<A, Validation<E, B>> f) {
2170-
return l -> l.traverseValidation(f);
2168+
public <E> F<List<A>, Validation<E, List<B>>> modifyValidationF(Semigroup<E> s, F<A, Validation<E, B>> f) {
2169+
return l -> l.traverseValidation(s, f);
21712170
}
21722171

21732172
@Override
Collapse file

‎core/src/main/java/fj/data/optic/PIso.java‎

Copy file name to clipboardExpand all lines: core/src/main/java/fj/data/optic/PIso.java
+2-1Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -6,6 +6,7 @@
66
import fj.P;
77
import fj.P1;
88
import fj.P2;
9+
import fj.Semigroup;
910
import fj.control.Trampoline;
1011
import fj.control.parallel.Promise;
1112
import fj.data.Either;
@@ -314,7 +315,7 @@ public F<S, P1<T>> modifyP1F(final F<A, P1<B>> f) {
314315
}
315316

316317
@Override
317-
public <E> F<S, Validation<E, T>> modifyValidationF(final F<A, Validation<E, B>> f) {
318+
public <E> F<S, Validation<E, T>> modifyValidationF(Semigroup<E> s, final F<A, Validation<E, B>> f) {
318319
return self.modifyValidationF(f);
319320
}
320321

Collapse file

‎core/src/main/java/fj/data/optic/PLens.java‎

Copy file name to clipboardExpand all lines: core/src/main/java/fj/data/optic/PLens.java
+2-1Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -4,6 +4,7 @@
44
import fj.Function;
55
import fj.Monoid;
66
import fj.P1;
7+
import fj.Semigroup;
78
import fj.control.Trampoline;
89
import fj.control.parallel.Promise;
910
import fj.data.Either;
@@ -320,7 +321,7 @@ public F<S, P1<T>> modifyP1F(final F<A, P1<B>> f) {
320321
}
321322

322323
@Override
323-
public <E> F<S, Validation<E, T>> modifyValidationF(final F<A, Validation<E, B>> f) {
324+
public <E> F<S, Validation<E, T>> modifyValidationF(Semigroup<E> s, final F<A, Validation<E, B>> f) {
324325
return self.modifyValidationF(f);
325326
}
326327

Collapse file

‎core/src/main/java/fj/data/optic/POptional.java‎

Copy file name to clipboardExpand all lines: core/src/main/java/fj/data/optic/POptional.java
+2-1Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -6,6 +6,7 @@
66
import fj.P;
77
import fj.P1;
88
import fj.P2;
9+
import fj.Semigroup;
910
import fj.control.Trampoline;
1011
import fj.control.parallel.Promise;
1112
import fj.control.parallel.Strategy;
@@ -345,7 +346,7 @@ public F<S, P1<T>> modifyP1F(final F<A, P1<B>> f) {
345346
}
346347

347348
@Override
348-
public <E> F<S, Validation<E, T>> modifyValidationF(final F<A, Validation<E, B>> f) {
349+
public <E> F<S, Validation<E, T>> modifyValidationF(Semigroup<E> s, final F<A, Validation<E, B>> f) {
349350
return self.modifyValidationF(f);
350351
}
351352

Collapse file

‎core/src/main/java/fj/data/optic/PPrism.java‎

Copy file name to clipboardExpand all lines: core/src/main/java/fj/data/optic/PPrism.java
+2-1Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -5,6 +5,7 @@
55
import fj.Monoid;
66
import fj.P;
77
import fj.P1;
8+
import fj.Semigroup;
89
import fj.control.Trampoline;
910
import fj.control.parallel.Promise;
1011
import fj.control.parallel.Strategy;
@@ -310,7 +311,7 @@ public F<S, P1<T>> modifyP1F(final F<A, P1<B>> f) {
310311
}
311312

312313
@Override
313-
public <E> F<S, Validation<E, T>> modifyValidationF(final F<A, Validation<E, B>> f) {
314+
public <E> F<S, Validation<E, T>> modifyValidationF(Semigroup<E> s, final F<A, Validation<E, B>> f) {
314315
return self.modifyValidationF(f);
315316
}
316317

Collapse file

‎core/src/main/java/fj/data/optic/PTraversal.java‎

Copy file name to clipboardExpand all lines: core/src/main/java/fj/data/optic/PTraversal.java
+12-11Lines changed: 12 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -10,6 +10,7 @@
1010
import fj.Monoid;
1111
import fj.P;
1212
import fj.P1;
13+
import fj.Semigroup;
1314
import fj.control.Trampoline;
1415
import fj.control.parallel.Promise;
1516
import fj.data.Either;
@@ -82,7 +83,7 @@ public abstract class PTraversal<S, T, A, B> {
8283
/**
8384
* modify polymorphically the target of a {@link PTraversal} with an Applicative function
8485
*/
85-
public abstract <E> F<S, Validation<E, T>> modifyValidationF(F<A, Validation<E, B>> f);
86+
public abstract <E> F<S, Validation<E, T>> modifyValidationF(Semigroup<E> s, F<A, Validation<E, B>> f);
8687

8788
/**
8889
* modify polymorphically the target of a {@link PTraversal} with an Applicative function
@@ -218,10 +219,10 @@ public F<Either<S, S1>, V2<Either<T, T1>>> modifyV2F(final F<A, V2<B>> f) {
218219
}
219220

220221
@Override
221-
public <E> F<Either<S, S1>, Validation<E, Either<T, T1>>> modifyValidationF(final F<A, Validation<E, B>> f) {
222+
public <E> F<Either<S, S1>, Validation<E, Either<T, T1>>> modifyValidationF(Semigroup<E> se, final F<A, Validation<E, B>> f) {
222223
return ss1 -> ss1.either(
223-
s -> self.modifyValidationF(f).f(s).map(Either.left_()),
224-
s1 -> other.modifyValidationF(f).f(s1).map(Either.right_())
224+
s -> self.modifyValidationF(se, f).f(s).map(Either.left_()),
225+
s1 -> other.modifyValidationF(se, f).f(s1).map(Either.right_())
225226
);
226227
}
227228

@@ -307,8 +308,8 @@ public F<S, P1<T>> modifyP1F(final F<C, P1<D>> f) {
307308
}
308309

309310
@Override
310-
public <E> F<S, Validation<E, T>> modifyValidationF(final F<C, Validation<E, D>> f) {
311-
return self.modifyValidationF(other.modifyValidationF(f));
311+
public <E> F<S, Validation<E, T>> modifyValidationF(Semigroup<E> s, final F<C, Validation<E, D>> f) {
312+
return self.modifyValidationF(s, other.modifyValidationF(s, f));
312313
}
313314

314315
@Override
@@ -450,7 +451,7 @@ public F<Either<S, S>, V2<Either<T, T>>> modifyV2F(final F<S, V2<T>> f) {
450451
}
451452

452453
@Override
453-
public <E> F<Either<S, S>, Validation<E, Either<T, T>>> modifyValidationF(final F<S, Validation<E, T>> f) {
454+
public <E> F<Either<S, S>, Validation<E, Either<T, T>>> modifyValidationF(Semigroup<E> se, final F<S, Validation<E, T>> f) {
454455
return s -> s.bimap(f, f).either(
455456
v -> v.map(Either.left_()),
456457
v -> v.map(Either.right_())
@@ -520,8 +521,8 @@ public F<S, V2<T>> modifyV2F(final F<A, V2<B>> f) {
520521
}
521522

522523
@Override
523-
public <E> F<S, Validation<E, T>> modifyValidationF(final F<A, Validation<E, B>> f) {
524-
return s -> f.f(get2.f(s)).apply(f.f(get1.f(s)).<F<B, T>> map(b1 -> b2 -> set.f(b1, b2, s)));
524+
public <E> F<S, Validation<E, T>> modifyValidationF(Semigroup<E> se, final F<A, Validation<E, B>> f) {
525+
return s -> f.f(get2.f(s)).accumapply(se, f.f(get1.f(s)).<F<B, T>> map(b1 -> b2 -> set.f(b1, b2, s)));
525526
}
526527

527528
@Override
@@ -611,8 +612,8 @@ public F<S, V2<T>> modifyV2F(final F<A, V2<B>> f) {
611612
}
612613

613614
@Override
614-
public <E> F<S, Validation<E, T>> modifyValidationF(final F<A, Validation<E, B>> f) {
615-
return s -> f.f(lastGet.f(s)).apply(curriedTraversal.modifyValidationF(f).f(s));
615+
public <E> F<S, Validation<E, T>> modifyValidationF(Semigroup<E> se, final F<A, Validation<E, B>> f) {
616+
return s -> f.f(lastGet.f(s)).accumapply(se, curriedTraversal.modifyValidationF(se, f).f(s));
616617
}
617618

618619
@Override
Collapse file

‎core/src/main/java/fj/data/optic/Traversal.java‎

Copy file name to clipboardExpand all lines: core/src/main/java/fj/data/optic/Traversal.java
+3-2Lines changed: 3 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -8,6 +8,7 @@
88
import fj.F7;
99
import fj.Monoid;
1010
import fj.P1;
11+
import fj.Semigroup;
1112
import fj.control.Trampoline;
1213
import fj.control.parallel.Promise;
1314
import fj.data.Either;
@@ -72,8 +73,8 @@ public F<S, P1<S>> modifyP1F(final F<A, P1<A>> f) {
7273
}
7374

7475
@Override
75-
public <E> F<S, Validation<E, S>> modifyValidationF(final F<A, Validation<E, A>> f) {
76-
return pTraversal.modifyValidationF(f);
76+
public <E> F<S, Validation<E, S>> modifyValidationF(Semigroup<E> s, final F<A, Validation<E, A>> f) {
77+
return pTraversal.modifyValidationF(s, f);
7778
}
7879

7980
@Override

0 commit comments

Comments
0 (0)
You are visitor 01402520 — GeezerVison does not store the pages you look up.
Best viewed with Netscape Navigator 4.7 or Internet Explorer 6 at 800×600. No cookies required.