Skip to content

Instantly share code, notes, and snippets.

View cstrahan's full-sized avatar

Charles Strahan cstrahan

117 followers · 33 following
  • Backtrace
  • Dallas, TX
View GitHub Profile
@cstrahan
cstrahan / redis-mini.nix
Created April 17, 2016 18:56 — forked from sigma/redis-mini.nix
{ pkgs ? import <nixpkgs> {} }:
with pkgs;
let
su_exec = pkgs.stdenv.mkDerivation {
name = "su-exec-0.2";
src = fetchurl {
url = https://github.com/ncopa/su-exec/archive/v0.2.tar.gz;
sha256 = "09ayhm4w7ahvwk6wpjimvgv8lx89qx31znkywqmypkp6rpccnjpc";
@cstrahan
cstrahan / VGG_ILSVRC_19_layers_train_val.prototxt
Created March 22, 2016 00:10 — forked from graphific/VGG_ILSVRC_19_layers_train_val.prototxt
VGG_ILSVRC_19_layers_train_val.prototxt
name: "VGG_ILSVRC_19_layers"
layers {
name: "data"
type: DATA
include {
phase: TRAIN
}
transform_param {
crop_size: 224
@cstrahan
cstrahan / nixos-infect
Created March 21, 2016 03:19 — forked from elitak/nixos-infect
#! /usr/bin/env bash
# WARNING NB This script wipes out the targeted host's root filesystem when it
# runs to completion. Any errors halt execution. set -x is used to help debug,
# as often a failed run leaves the system in an inconsistent state, requiring a
# rebuild (in DigitalOcean panel: Droplet Settings -> "Destroy" -> "Rebuild
# from original").
#
# TO USE:
# - Add any custom config you want (see notes below)
@cstrahan
cstrahan / Modified Twily's Powerline
Created March 8, 2016 16:28
FireFox CSS
@namespace html url(http://www.w3.org/1999/xhtml);
@namespace xul url(http://www.mozilla.org/keymaster/gatekeeper/there.is.only.xul);
/*
Author: Twily
Description: Minimal flat styled tabs for Australis
Compitability: Firefox Nightly v31.0a1 - v32.0a1 (Australis)
CSS Variables were introduced to Firefox in v29.0a1
Website: http://twily.info/
@cstrahan
cstrahan / Categories.hs
Last active March 3, 2016 03:57 — forked from ekmett/Categories.hs
{-# language KindSignatures #-}
{-# language PolyKinds #-}
{-# language DataKinds #-}
{-# language TypeFamilies #-}
{-# language RankNTypes #-}
{-# language NoImplicitPrelude #-}
{-# language FlexibleContexts #-}
{-# language MultiParamTypeClasses #-}
{-# language GADTs #-}
{-# language ConstraintKinds #-}
@cstrahan
cstrahan / profunctors.lhs
Created March 1, 2016 20:50 — forked from bennofs/profunctors.lhs
Profunctor lenses
Profunctor lenses
=================
First, we enable the RankNTypes extension which gives us 'forall' and also import some modules:
> {-# LANGUAGE RankNTypes #-}
> module ProfunctorLenses where
> import Data.Profunctor
> import Data.Tagged
> import Data.Bifunctor
@cstrahan
cstrahan / Pcbt.hs
Created February 29, 2016 22:08 — forked from pchiusano/Pcbt.hs
Prioritized critical bit tree data structure
{-# Language TypeFamilies #-}
module Pcbt where
import Prelude hiding (lookup)
import Data.Set (Set)
import Data.Map (Map)
import qualified Data.Set as Set
import qualified Data.Map.Strict as Map
import Data.Maybe
@cstrahan
cstrahan / gist:62966e1673db4fbb0975
Created February 28, 2016 23:25 — forked from nkpart/gist:cc852b43d948a33a04c8
Using ghcid inside of emacs
Pieces you need:
* emacs
* ghcid
ghcid needs to know the height of the terminal, we'll set it explicitly
height = (window-height) - (scroll-margin) - 1
set this height as your term-buffer-maximum-size
@cstrahan
cstrahan / emacs-24.5-24bit.diff
Last active February 15, 2017 03:49 — forked from choppsv1/emacs-24.4-24bit.diff
True color (24-bit) terminal support for Emacs 24.5
This is a modified version of the patch found here:
https://gist.github.com/choppsv1/36aacdd696d505566088
Which itself is a modified version of:
http://emacs.1067599.n5.nabble.com/RFC-Add-tty-True-Color-support-tt299962.html
To use true-color, use the flag --color=true-color.
Alternatively, set the EMACS_TRUE_COLOR_SEPARATOR environment variable to
either ':' or ';'.
@cstrahan
cstrahan / VLPipes.hs
Created February 16, 2016 04:20 — forked from sjoerdvisscher/VLPipes.hs
Van Laarhoven pipes
{-# LANGUAGE RecordWildCards #-}
import Control.Monad
import Control.Monad.Trans.Class
import Data.Void
data ProxyOps a' a b' b m = Ops { req :: a' -> m a, resp :: b -> m b' }
newtype Proxy a' a b' b m r = Proxy { runProxy :: ProxyOps a' a b' b m -> m r }
run :: ProxyOps a' a b' b m -> Proxy a' a b' b m r -> m r