View gist:9191499
import scalaz.stream._ | |
import Process._ | |
import scalaz.concurrent.Task | |
import scala.concurrent.duration._ | |
// git bisect identifies the offending commit as | |
// https://github.com/scalaz/scalaz-stream/commit/721716ed7af0c126593e9ee227c0f36f21c5b7ed | |
object Test { |
View gist:9644001
// In real life, it's great that stuff gets restarted when it fails. | |
// In testing, we'd rather know that it failed. | |
import akka.actor._ | |
class DyingActor extends Actor { | |
def receive = { case "die" => throw new Exception("poo") } | |
} | |
// Default config, everything restarts automatically | |
val system = ActorSystem("ordinary") |
View etaExpansionAndImplicits
scala> class Banana[P] {} | |
defined class Banana | |
// We will know when this gets called, when the banana is needed | |
scala> implicit def myBanana[P]: Banana[P] = { println("banana time"); new Banana[P] } | |
myBanana: [P]=> Banana[P] | |
// method with implicits | |
scala> def addWithBanana(one: Int)(two: Int)(implicit banana: Banana[Int]) = {println(banana); one + two} |
View methodAsFunction
var completeSale = function(num) { | |
console.log("Sale " + num + ": selling " + this.items + " to " + this.customer); | |
} | |
var foo = { | |
customer: "Fred", | |
items: ["carrot","eggs"], | |
complete: completeSale | |
}; |
View threadingMacro
(defn addCustomer [sale, cust] (assoc sale :customer cust)) | |
(defn addItems [sale, items] (assoc sale :items items)) | |
(defn complete [sale, num] (println "Sale" num ": selling" (:items sale) "to" (:customer sale))) | |
(def sale { :store "Downtown" }) | |
(-> sale | |
(addCustomer "Fred") | |
(addItems ["carrot", "eggs"]) | |
(complete 100) |
View main.log
== Summum Bonum, by Robert Browning == | |
All the breath and the bloom of the year | |
In the bag of one bee | |
All the wonder and wealth of the mine | |
In the heart of one gem | |
In the core of one pearl all the shade | |
And the shine of the sea | |
Breath and bloom, shade and shine, wonder, wealth, | |
And how far above them | |
Truth that's brighter than gem |
View idea
You're sitting there and | |
all the sudden something comes to you and everything stops | |
You look down at no point in particular | |
but then the music is thrumming in your ears and | |
you see these colors come at the edge of your vision | |
red and yellow and blue, focusing in on them | |
If you can't stop it because you don't want to lose it | |
and you know that there's something there | |
Your vision blurs a bit and it becomes | |
this blackness in front of you |
View Box.elm
module Box (Model, init, Action, update, view) where | |
import Html exposing (..) | |
import Html.Attributes exposing (style) | |
import Html.Events exposing (onClick) | |
-- MODEL | |
type alias Model = () |
View Failure.elm
module Failure where | |
import InnerComponent | |
--- ACTION | |
type InnerAction = InnerComponent.Action -- oops, meant type alias | |
type Action = Passthru InnerAction | |
-- MODEL |
View EffectsTest.elm
module EffectsTest where | |
import Html exposing (..) | |
import Html.Events exposing (onClick) | |
import StartApp exposing (App) | |
import Task exposing (Task) | |
import Effects exposing (Effects, Never) | |
OlderNewer