Skip to content

Instantly share code, notes, and snippets.

@dwhitney
Last active November 8, 2016 20:20
Show Gist options
  • Save dwhitney/83649b7df373e2110fbf938b2baf5e46 to your computer and use it in GitHub Desktop.
Save dwhitney/83649b7df373e2110fbf938b2baf5e46 to your computer and use it in GitHub Desktop.
import cats._
import cats.free.Free
import cats.implicits._
import freek._
sealed trait LogDSL[A]
case class Info(msg: String) extends LogDSL[Unit]
object Log{
type PRG = LogDSL :|: NilDSL
val PRG = DSL.Make[PRG]
object Service extends Freekit(PRG){
}
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment