• Home
• io.argonaut
• argonaut-scalaz_2.12
• 6.3.10
• source code
• CursorHistoryScalaz.scala

×

Project download

Many resources are needed to download a project. Please understand that we have to compensate our server costs. Thank you in advance.
Project price only 1 $

You can buy this project and download/modify it how often you want.

argonaut.CursorHistoryScalaz.scala Maven / Gradle / Ivy

package argonaut

import scalaz._
import std.list._
import syntax.equal._
import CursorOpScalaz._

object CursorHistoryScalaz extends CursorHistoryScalazs

trait CursorHistoryScalazs {
  implicit val CursorHistoryInstances: Show[CursorHistory] & Equal[CursorHistory] & Monoid[CursorHistory] = {
    new Show[CursorHistory] with Equal[CursorHistory] with Monoid[CursorHistory] {
      override def show(h: CursorHistory) = Show[List[CursorOp]].show(h.toList)
      def equal(h1: CursorHistory, h2: CursorHistory) = {
        h1.toList === h2.toList
      }
      def zero = CursorHistory(List())
      def append(h1: CursorHistory, h2: => CursorHistory) = {
        CursorHistory(h1.toList ::: h2.toList)
      }
    }
  }
}