Skip to content

Instantly share code, notes, and snippets.

Avatar

Beerend Lauwers beerendlauwers

View GitHub Profile
@beerendlauwers
beerendlauwers / dohaskell-db-scraper.hs
Created Aug 15, 2016
Quick db scraper written by Mitchell Rosen to generate the YAML.
View dohaskell-db-scraper.hs
#!/usr/bin/env stack
-- stack --resolver lts-6.10 runghc --package sqlite-simple --package text --package time
{-# LANGUAGE OverloadedStrings #-}
import Control.Applicative
import Control.Monad
import Data.Monoid
import Data.Foldable
import Data.Maybe
@beerendlauwers
beerendlauwers / test.js
Last active Sep 30, 2015
Attempt at loading extra CSS in StackEdit without replacing default.css
View test.js
// This doesn't seem to work. The browser only noticed the CSS file if it completely replaced <link type="text/css" rel="stylesheet" href="res-min/themes/default.css">.
// So, in a worst-case scenario, you can just copy that CSS file, add your changes to it, host it on Github and do the replacement with a UserCustom extension (https://github.com/benweet/stackedit/wiki/UserCustom-extensions).
// Also tried onReady https://github.com/benweet/stackedit/wiki/userCustom.onReady
$(document).ready( function() {
var loadCSS = function(href) {
var cssLink = $("<link rel='stylesheet' type='text/css' href='"+href+"'>");
$("head").append(cssLink);
};
@beerendlauwers
beerendlauwers / stack.yaml
Created Aug 4, 2015
Support files for reddit issue
View stack.yaml
flags: {}
packages:
- '.'
extra-deps:
- Win32-notify-0.3.0.1
- reddit-0.1.1.0
resolver: lts-2.13
View Data.hs
{-# LANGUAGE QuasiQuotes #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE FlexibleContexts #-}
module Yesod.DataSource.Data where
import Yesod
import Data.Text (Text)
-- Subsites have foundations just like master sites.
@beerendlauwers
beerendlauwers / gist:9f0492f90a0fadb361e5
Created Jan 13, 2015
Newtypes for richer type hinting of Matt Pryor's Lazy\Sequence library
View gist:9f0492f90a0fadb361e5
<?php
// Some newtypes that allow for richer type hinting in Matt Pryor's Lazy\Sequence library. https://bitbucket.org/mkjpryor/lazy-sequence/wiki/Home
interface ArrayInterface extends Traversable {
}
class Finite implements IteratorAggregate, ArrayInterface {
View PHP 5.5 crash
<?php
class Test {
private $f = NULL;
public function addFunction( callable $f ) {
if ($this->f === NULL) {
$this->f = $f;
}
You can’t perform that action at this time.