Rick Richardson rrichardson

💭

⚔️ Hacking Away

rrichardson / gist:889366

Created March 27, 2011 16:53


	{-# LANGUAGE TypeFamilies #-}
	{-# LANGUAGE TemplateHaskell #-}
	{-# LANGUAGE TypeSynonymInstances #-}
	{-# LANGUAGE DeriveDataTypeable #-}
	{-# LANGUAGE ScopedTypeVariables #-}
	{-# LANGUAGE FlexibleInstances #-}
	{-# LANGUAGE PackageImports #-}
	{-# LANGUAGE ExistentialQuantification #-}

rrichardson / gist:923372

Created April 16, 2011 18:23



	projectFields :: EntityDef -> [DB.Field]
	projectFields ent = zipWith (DB.:=) (getFields ent) [1,2..]

rrichardson / gist:1208343

Created September 10, 2011 14:05

	def load[ChartType : Manifest](opts : ForexChartOptions) {
	val mainchart = new ChartType(opts)
	mainchart.pack()
	RefineryUtilities.centerFrameOnScreen(mainchart)
	mainchart.setVisible(true)
	}

rrichardson / gist:1208362

Created September 10, 2011 14:27

	def load[ChartType : Manifest](opts : ForexChartOptions) {
	val ctClass = implicitly[Manifest[ChartType]].erasure
	val mainchart = ctClass.newInstance.asInstanceOf[ChartType]
	mainchart.pack()
	RefineryUtilities.centerFrameOnScreen(mainchart)
	mainchart.setVisible(true)
	}

rrichardson / gist:1257612

Created October 2, 2011 16:39

	libraryDependencies ++= {
	val liftVersion = "2.4-M4" // Put the current/latest lift version here
	Seq(
	"net.liftweb" %% "lift-webkit" % liftVersion % "compile->default",
	"net.liftweb" %% "lift-paypal" % liftVersion % "compile->default",
	"net.liftweb" %% "lift-machine" % liftVersion % "compile->default",
	"net.liftweb" %% "lift-textile" % liftVersion % "compile->default",
	"net.liftweb" %% "lift-wizard" % liftVersion % "compile->default",
	"net.liftweb" %% "lift-mongodb" % liftVersion % "compile->default",
	"net.liftweb" %% "lift-mongodb-record" % liftVersion % "compile->default")

rrichardson / gist:1297364

Created October 19, 2011 02:49


	trait SlashemField[V, M <: Record[M]] extends OwnedField[M] {
	def valueBoxFromAny(a: Any): Box[V] = {
	try {
	Full(a.asInstanceOf[V])
	} catch {
	case _ => Empty
	}
	}
	}

rrichardson / gist:1314544

Created October 25, 2011 22:25

	<!DOCTYPE html>
	<html lang="en">
	<head>
	<meta charset=utf-8>
	<meta name="viewport" content="width=620">
	<title>Slider demo</title>
	<link type="text/css" href="css/flick/jquery-ui-1.8.16.custom.css" rel="Stylesheet" />
	<script type="text/javascript" src="js/jquery-1.4.4.min.js"></script>
	<script type="text/javascript" src="js/jquery-ui-1.8.16.custom.min.js"></script>
	<style>

rrichardson / ?

Created March 27, 2012 21:22

this


	fn readZip(fname: str) -> io::reader unsafe {
	let mode= "r";
	let fptr = str::as_c_str(fname) {\|f\| str::as_c_str(mode) { \|m\| libc::popen(f, m) }; };
	io::FILE_reader(fptr, true);
	}

	fn main() {
	let rd = readZip("unzip -p \*.zip");
	}

rrichardson / gist:2270051

Created April 1, 2012 00:33

rrichardson / gist:4521968

Last active December 11, 2015 01:18

	var flatiron = require('flatiron'),
	ecstatic = require('ecstatic'),
	socketful = require('socketful'),
	restful = require('restful'),
	resourceful = require('resourceful');


	var app = module.exports = flatiron.app;
	app.use(flatiron.plugins.http, {
	before: [