saolsen

#lang racket
(define (get-spaces-inner n spaces)
  (define current-space (car spaces))
  (if (> current-space n)
      (cdr spaces)
      (get-spaces-inner n (cons (* current-space 2) spaces))))

(define (get-spaces n)
  (get-spaces-inner n '(1)))

kisom

#!/bin/sh
# Produce an HTML file displaying code coverage. Dependencies:
# - cloc (apt-get install cloc)
# - cover (go get code.google.com/p/go.tools/cmd/cover)

if [ -z "$1" ]; then
	PKG=""
else
	PKG=$1
fi

maxtruxa

Antonym List

Note: The table headings (positive/negative) are not necessarily meaningful.

Positive	Negative
acquire	release
add	remove (e.g. an item), subtract (arithmetic)
advance	retreat
allocate	deallocate (correct), free (common)
allow	deny

SeanTAllen

Here's the idea,

You work in tech. You're in the NYC area.
You care about "people" issues. You think the hardest problem in computing is "people".
You are interested in how we work. How to structure work. How to work together.
How to help your colleagues succeed. 

And...

There's so much to learn:

dimitardanailov

server {
  listen 80 default deferred;

  server_name myapp.com;

  root /var/www/project-folder/;

  # Nginx and Angularjs with html mode 5 - https://gist.github.com/cjus/b46a243ba610661a7efb
  index index.html;

favila

(require '[datomic.api :as d])

(defn entity-changes
  "Return transaction history for an entity and its components.
  Returns a sequence of maps, each is the transaction map (tx metadata) plus a
  key `:entity-changes`, which is a nested map of keys: entity id, attribute
  ident, `:db/add` or `:db/retract`, and the value added or retracted, e.g.:
      {12345678910 {:long-card-1-attr          {:db/retract 1
                                                :db/add     0}
                    :long-card-many-attr       {:db/add     #{0}}

garybernhardt

This document has moved!

It's now here, in The Programmer's Compendium. The content is the same as before, but being part of the compendium means that it's actively maintained.

geoff-kruss

; Metric callback handler for pushing Datomic metrics to CloudWatch
;
; http://docs.datomic.com/monitoring.html
; 
; Instructions:
;   1) Add CloudWatch sdk to your project.clj
;
;        [com.amazonaws/aws-java-sdk-cloudwatch "1.11.6"]
;
;   2) Specify the handler function as the metrics callback handler with a java opt at run time

pjstadig

(ns maps.core)

;; In Clojure you can fetch items from a map three different ways.  Which should
;; you use when?

(= "bar" ({:foo "bar"} :foo))     ; map as function
(= "bar" (:foo {:foo "bar"}))     ; key as function
(= "bar" (get {:foo "bar"} :foo)) ; `get` as function

;; <INCIDENTALLY>

pjstadig

(ns typehint.core)

;; A little type hint hint...

(set! *warn-on-reflection* true)

;; There are two ways to type hint the return value of a function, but one is
;; (technically) wrong:

(defn ^String as-string0