Skip to content

Instantly share code, notes, and snippets.

package mytest
import org.specs2.execute.Details
import org.specs2.mutable._
import org.specs2.reporter.Notifier
class MyNotifier extends Notifier {
override def exampleFailure(name: String, message: String,
@edgarmueller
edgarmueller / gist:584c3d1faa933a4cb568
Created January 9, 2015 18:51
Json writes for a superclass in scala
trait PropertyType {
def price: Double
}
case class House(price: Double, noOfBedRooms: Option[Short]) extends PropertyType
case class Land(price: Double, area: Option[Double]) extends PropertyType
object House {
implicit val houseReads: Reads[House] = (
(JsPath \ "price").read[Double] and
package rest.spray.service
import akka.actor.Actor
import reactivemongo.api.MongoDriver
import reactivemongo.bson.{BSONDocument, BSONDocumentReader, BSONObjectID, Macros}
import spray.httpx.SprayJsonSupport._
import spray.json._
import spray.routing._
import scala.concurrent.Future
package com.example
import akka.actor.Actor
import reactivemongo.api.MongoDriver
import reactivemongo.bson.{BSONDocument, BSONDocumentReader, BSONObjectID, Macros}
import spray.httpx.SprayJsonSupport._
import spray.json._
import spray.routing._
import scala.concurrent.Future
import scala.util.{Failure, Success}
@edgarmueller
edgarmueller / Problem B. Reverse Words.clj
Created April 5, 2011 16:12
clojure implementation
(ns reverse-words
(use [clojure.contrib.str-utils])
(:import (java.io BufferedReader FileReader)))
(defn reverse-words [file-name]
(with-open [reader (BufferedReader. (FileReader. file-name))]
(let [lines (line-seq reader)
n (Integer/parseInt (first lines))]
(doseq [[xs i] (map vector (rest lines) (range 1 (inc n)))]
(println (str "Case #" i ":")
(ns store-credit
(use [clojure.contrib.str-utils])
(:import (java.io BufferedReader FileReader)))
(defn sum-items [v i]
(let [h (first v)
r (rest v)
j (atom i)]
(if (empty? v)
[]
@edgarmueller
edgarmueller / poktertimezilla.zsh
Created May 9, 2012 08:51
Pokertimezilla in ZSH
#!/bin/zsh
emulate -L zsh
b=(1 2 2 4 5 10 10 20 25 50 50 100 100 200 200 400 400 800 800 1600 1600 3200 3200 6400 6400 12800)
c=1
rt=5
while [ "$c" -le "${#b}" ]; do
for i in {$rt..0}; do
sleep 1
print -n "Time: ${(l:2::0:)$((i/60))}:${(l:2::0:)$((i%60))} Blinds: $b[$c], $b[$c+1]\r"
@edgarmueller
edgarmueller / product.json
Last active December 1, 2015 14:52
Slightly modified version of http://json-schema.org/example1.html
{
"$schema": "http://json-schema.org/draft-04/schema#",
"title": "Product",
"type": "object",
"properties": {
"id": {
"description": "The unique identifier for a product",
"type": "number"
},
"name": {
@edgarmueller
edgarmueller / library.json
Last active December 18, 2015 10:01
Example Library JSON Schema
{
"definitions": {
"writer": {
"type": "object",
"properties": {
"name": {
"type": "string"
},
"books": {
"type": "array",
@edgarmueller
edgarmueller / LDAPUserVerifierTest.java
Created May 10, 2017 09:23
EMFStore LDAP Example Test
public class LDAPUserVerifierTest extends ESTestWithMockServer {
@BeforeClass
public static void beforeClass() {
startEMFStore();
}
@AfterClass
public static void afterClass() {
stopEMFStore();