mirror of
https://github.com/IBM/fp-go.git
synced 2025-08-10 22:31:32 +02:00
fix: add WithTime and WithDuration
Signed-off-by: Dr. Carsten Leue <carsten.leue@de.ibm.com>
This commit is contained in:
@@ -22,6 +22,7 @@ import (
|
||||
C "github.com/IBM/fp-go/internal/chain"
|
||||
FC "github.com/IBM/fp-go/internal/functor"
|
||||
L "github.com/IBM/fp-go/internal/lazy"
|
||||
T "github.com/IBM/fp-go/tuple"
|
||||
)
|
||||
|
||||
// type IO[A any] = func() A
|
||||
@@ -175,3 +176,23 @@ func MonadFlap[FAB ~func(A) B, GFAB ~func() FAB, GB ~func() B, A, B any](fab GFA
|
||||
func Flap[FAB ~func(A) B, GFAB ~func() FAB, GB ~func() B, A, B any](a A) func(GFAB) GB {
|
||||
return F.Bind2nd(MonadFlap[FAB, GFAB, GB, A, B], a)
|
||||
}
|
||||
|
||||
// WithTime returns an operation that measures the start and end timestamp of the operation
|
||||
func WithTime[GTA ~func() T.Tuple3[A, time.Time, time.Time], GA ~func() A, A any](a GA) GTA {
|
||||
return MakeIO[GTA](func() T.Tuple3[A, time.Time, time.Time] {
|
||||
t0 := time.Now()
|
||||
res := a()
|
||||
t1 := time.Now()
|
||||
return T.MakeTuple3(res, t0, t1)
|
||||
})
|
||||
}
|
||||
|
||||
// WithDuration returns an operation that measures the duration of the operation
|
||||
func WithDuration[GTA ~func() T.Tuple2[A, time.Duration], GA ~func() A, A any](a GA) GTA {
|
||||
return MakeIO[GTA](func() T.Tuple2[A, time.Duration] {
|
||||
t0 := time.Now()
|
||||
res := a()
|
||||
t1 := time.Now()
|
||||
return T.MakeTuple2(res, t1.Sub(t0))
|
||||
})
|
||||
}
|
||||
|
11
io/io.go
11
io/io.go
@@ -19,6 +19,7 @@ import (
|
||||
"time"
|
||||
|
||||
G "github.com/IBM/fp-go/io/generic"
|
||||
T "github.com/IBM/fp-go/tuple"
|
||||
)
|
||||
|
||||
// IO represents a synchronous computation that cannot fail
|
||||
@@ -156,3 +157,13 @@ func Delay[A any](delay time.Duration) func(IO[A]) IO[A] {
|
||||
func After[A any](timestamp time.Time) func(IO[A]) IO[A] {
|
||||
return G.After[IO[A]](timestamp)
|
||||
}
|
||||
|
||||
// WithTime returns an operation that measures the start and end [time.Time] of the operation
|
||||
func WithTime[A any](a IO[A]) IO[T.Tuple3[A, time.Time, time.Time]] {
|
||||
return G.WithTime[IO[T.Tuple3[A, time.Time, time.Time]], IO[A]](a)
|
||||
}
|
||||
|
||||
// WithDuration returns an operation that measures the [time.Duration]
|
||||
func WithDuration[A any](a IO[A]) IO[T.Tuple2[A, time.Duration]] {
|
||||
return G.WithDuration[IO[T.Tuple2[A, time.Duration]], IO[A]](a)
|
||||
}
|
||||
|
Reference in New Issue
Block a user