scaloi.syntax.AlignOps.scala Maven / Gradle / Ivy
Go to download
Show more of this group Show more artifacts with this name
Show all versions of scaloi_2.13 Show documentation
Show all versions of scaloi_2.13 Show documentation
Fyne thyngges from Learning Objects, an LO Venture
The newest version!
/*
* Copyright 2007 Learning Objects
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
package scaloi
package syntax
import scalaz.{Align, Monoid, \&/ => These}
/** Operations on [[scalaz.Align]]able things.
*/
final class AlignOps[F[_], A](private val fa: F[A]) extends AnyVal {
import These.{This, That, Both}
/** Align this and `fb`, using `a` and `b` as default values for those types.
*
* @param fb the other `F` with which to align this
* @param a the value to pad with on the right
* @param b the value to pad with on the left
* @return an aligned `F[(A, B)]`
*/
//noinspection VariablePatternShadow (it looks nice this way)
def zipWithDefault[B](fb: F[B])(a: => A, b: => B)(implicit F: Align[F]): F[(A, B)] =
F.alignWith[A, B, (A, B)] { // scalaz pls
case This(a) => (a, b)
case That(b) => (a, b)
case Both(a, b) => (a, b)
} (fa, fb)
/** Align this and `fb`, using monoidal defaults for `A` and `B`.
*
* @param fb the other `F` with which to align this
* @return an aligned `F[(A, B)]`
*/
def zipM[B](fb: F[B])(implicit F: Align[F], A: Monoid[A], B: Monoid[B]): F[(A, B)] =
zipWithDefault(fb)(A.zero, B.zero)(F)
}
/** Implicit conversions to [[AlignOps]]. */
trait ToAlignOps {
import language.implicitConversions
/** Implicitly convert to [[AlignOps]]. */
// XXX: F: Align constraint removed as it baffles intellij
@inline implicit final def ToAlignOps[F[_]/*: Align*/, A](fa: F[A]): AlignOps[F, A] =
new AlignOps[F, A](fa)
}