| RSpec.configure do |config| | |
| config.mock_with :rspec | |
| config.infer_base_class_for_anonymous_controllers = false | |
| config.around(:each, :transactional => true) do |example| | |
| Sequel::DATABASES.first.transaction do | |
| example.run | |
| raise Sequel::Error::Rollback | |
| end | |
| end |
| (use 'clojure.test) | |
| (defn fizzbuzz [coll] | |
| (map (fn [num] | |
| (cond | |
| (and (zero? (mod num 3)) (zero? (mod num 5))) "FizzBuzz" | |
| (zero? (mod num 3)) "Fizz" | |
| (zero? (mod num 5)) "Buzz" | |
| :else num)) | |
| coll)) |
| (ns clojurebreaker.core | |
| (:use [trammel.core :only (defconstrainedfn defcontract)]) | |
| (:require [clojure.data :as data] | |
| [trammel.provide :as provide] | |
| [trammel.factors :as factors])) | |
| (defn valid-inputs? [& colls] | |
| (and (every? vector? colls) | |
| (every? true? (map (fn [coll] | |
| (every? #(some #{%} [:r :g :b :y]) coll)) |
| class Inspector | |
| # :nodoc: | |
| def self._collect_events_for_method_call(&block) | |
| events = [] | |
| set_trace_func lambda { |event, file, line, id, binding, classname| | |
| events << { :event => event, :file => file, :line => line, :id => id, :binding => binding, :classname => classname } | |
| } | |
| import Data.List | |
| import Data.Maybe | |
| alphabet = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789" | |
| base = length alphabet | |
| encode :: Int -> String | |
| encode 0 = "a" | |
| encode id = map (\x -> alphabet !! x) (reverse (tail (map (\x -> snd x) options))) | |
| where options = takeWhile (/= (0,0)) (iterate (\x -> ((fst x `div` 62), (fst x `mod` 62))) (id,0)) |
| #include <ngx_config.h> | |
| #include <ngx_core.h> | |
| #include <ngx_http.h> | |
| typedef struct { | |
| ngx_str_t abusers_filename; | |
| } ngx_http_repsheet_loc_conf_t; | |
| static char *ngx_http_repsheet(ngx_conf_t *cf, ngx_command_t *cmd, void *conf); | |
| static void *ngx_http_repsheet_create_loc_conf(ngx_conf_t *cf); |
Style: Cider
This is a common fall hard cider. Best when apples are in season and you can find fresh pressed, unpasteurized apple cider. If you can't get your hands on fresh pressed cider, any store bought cider that is 100% juice and has no preservatives will also work, but you will lose
This gist is part of a blog post. Check it out at:
http://jasonrudolph.com/blog/2011/08/09/programming-achievements-how-to-level-up-as-a-developer
| (defn change [cents] | |
| (loop [amount cents | |
| change []] | |
| (if (or (zero? amount) (> 0 amount)) | |
| change | |
| (let [coins [25 10 5 1] | |
| coin (apply max (filter (partial >= amount) coins))] | |
| (recur (- amount coin) (conj change coin)))))) |
| gcc -v | |
| Using built-in specs. | |
| COLLECT_GCC=gcc | |
| COLLECT_LTO_WRAPPER=/usr/lib/gcc/x86_64-unknown-linux-gnu/4.7.2/lto-wrapper | |
| Target: x86_64-unknown-linux-gnu | |
| Configured with: /build/src/gcc-4.7.2/configure --prefix=/usr --libdir=/usr/lib --libexecdir=/usr/lib --mandir=/usr/share/man --infodir=/usr/share/info --with-bugurl=https://bugs.archlinux.org/ --enable-languages=c,c++,ada,fortran,go,lto,objc,obj-c++ --enable-shared --enable-threads=posix --with-system-zlib --enable-__cxa_atexit --disable-libunwind-exceptions --enable-clocale=gnu --disable-libstdcxx-pch --enable-libstdcxx-time --enable-gnu-unique-object --enable-linker-build-id --with-ppl --enable-cloog-backend=isl --disable-ppl-version-check --disable-cloog-version-check --enable-lto --enable-gold --enable-ld=default --enable-plugin --with-plugin-ld=ld.gold --with-linker-hash-style=gnu --disable-multilib --disable-libssp --disable-build-with-cxx --disable-build-poststage1-with-cxx --enable-checking=release | |
| Thread model: posix | |
| gcc version 4.7.2 (GCC) | |
| autom |