zeroformatter.scalaz.package.scala Maven / Gradle / Ivy

Go to download

Show more of this group Show more artifacts with this name
Show all versions of zero-formatter-scalaz_sjs0.6_2.12 Show documentation

Implementation of ZeroFormatter in Scala

The newest version!

package zeroformatter

import _root_.scalaz._

package object scalaz {

  implicit val formatterInvariantFunctor: InvariantFunctor[Formatter] = new InvariantFunctor[Formatter] {
    override def xmap[A, B](fa: Formatter[A], f: A => B, g: B => A) = fa.xmap(f, g)
  }

  @inline
  implicit def idFormatter[T](implicit F: Formatter[T]): Formatter[Id.Id[T]] = F

  implicit def maybeFormatter[T: Formatter]: Formatter[Maybe[T]] =
    Formatter[Option[T]].xmap(o => Maybe.fromOption(o), _.toOption)

  implicit def ilistFormatter[A](implicit F: Formatter[A]): Formatter[IList[A]] = new Formatter[IList[A]] {
    override val length = None

    override def serialize(encoder: Encoder, offset: Int, value: IList[A]) =
      if(value == null) encoder.writeInt(offset, -1)
      else {
        val length = value.length
        val byteSize =
          F.length.fold(encoder.writeInt(offset, length))(
            l => {
              encoder.ensureCapacity(offset, 4 + l * length)
              encoder.writeIntUnsafe(offset, length)
            }
          )

        value.foldLeft(byteSize){ case (acc, v) =>
          acc + F.serialize(encoder, offset + acc, v)
        }
      }

    override def deserialize(decoder: Decoder) = {
      val length = decoder.readInt()
      if(length == -1) null
      else if(length < -1) throw FormatException(decoder.offset - 4, s"Invalid List length($length).")
      else {
        var list: IList[A] = IList.empty
        var i = 0
        while(i < length) {
          list ::= F.deserialize(decoder)
          i += 1
        }
        list.reverse
      }
    }
  }

  implicit def eagerListFormatter[A](implicit
    F: Formatter[A]
  ): Formatter[LazyList[Id.Id, A]] =
    LazyList.lazyListFormatter[Id.Id, A](F, F)
}