boutros

~/$ lein new ring-on-heroku
Created new project in: /home/jim/Development/ring-on-heroku
~/$ cd ring-on-heroku
~/ring-on-heroku$ echo 'web: lein run -m ring-on-heroku.core' > Procfile
~/ring-on-heroku$ cat > src/ring_on_heroku/core.clj 
(ns ring-on-heroku.core
  (:use ring.util.response
        ring.adapter.jetty))

(defn app [req]

boutros

# Here's the example from rpsec-given
#
# Initially, I thought I'd like the Given/When/Then
# replacement for RSPec's cruddy "it", but I don't
# I find this test very hard to follow, as there are
# several statements that create state via variables
# in a subtle and unclear way.  Further, we have some
# strange indirection with the "stack_with(initial_contents)".
# It seems like we're adding a lot of complexity just to save
# a simple variable assignment.

boutros

source 'http://rubygems.org'

gem 'goliath',         :git => 'https://github.com/postrank-labs/goliath.git'
gem 'yajl-ruby'

gem 'eventmachine', :git => 'git://github.com/eventmachine/eventmachine.git', :require => 'eventmachine'
gem 'em-http-request', :git => 'https://github.com/igrigorik/em-http-request.git'
gem "em-synchrony", :git => 'https://github.com/igrigorik/em-synchrony.git'

boutros

# Server App
# This file must be in lib/myapp/api.rb
module MyApp
  module Entities
    class Products < Grape::Entity
      expose :id, :code, :name, :short_description
      expose :description, :unless => { :collection => true }
      expose (:category) { |model, options| model.category.name }
      expose (:brand) { |model, options| model.brand.name }
    end

boutros

(defn uuid [] (str (java.util.UUID/randomUUID)))

boutros

// before
mainWindow.menu("File", function(err, file) {
 if(err) throw err;
 file.openMenu(function(err, menu) {
   if(err) throw err;
   menu.item("Open", function(err, item) {
     if(err) throw err;
     item.click(function(err) {
       if(err) throw err;
       mainWindow.getChild(type('Window'), function(err, dialog) {

boutros

"x_#{`uuidgen`.strip}"

boutros

require "rubygems"
require "bundler/setup"
require "goliath"
require "goliath/websocket"

class User < Goliath::WebSocket

  def on_open(env)
    env.logger.info("WS OPEN")
  end

boutros

Here are some resources that I found helpful and found inspiration from when I was writing the talk.

• How To Design A good API and Why It Matters by Joshua Bloch
• Albert Einstein Quotes from Brainy Quote
• The Art of Unix Programming by Eric Steven Raymond

boutros

(ns cl-graph
  (:refer-clojure :exclude [==])
  (:use clojure.core.logic))

;; Directed Acyclic Graphs

(defrel edge a b)

;;    a
;;    |