Alexei Zaviruha AZaviruha

Virtual Hosts on nginx (CSC309)

When hosting our web applications, we often have one public IP address (i.e., an IP address visible to the outside world) using which we want to host multiple web apps. For example, one may wants to host three different web apps respectively for example1.com, example2.com, and example1.com/images on the same machine using a single IP address.

How can we do that? Well, the good news is Internet browsers

Reader Macros in Common Lisp

This post also appears on lisper.in.

Reader macros are perhaps not as famous as ordinary macros. While macros are a great way to create your own DSL, reader macros provide even greater flexibility by allowing you to create entirely new syntax on top of Lisp.

Paul Graham explains them very well in [On Lisp][] (Chapter 17, Read-Macros):

The three big moments in a Lisp expression's life are read-time, compile-time, and runtime. Functions are in control at runtime. Macros give us a chance to perform transformations on programs at compile-time. ...read-macros... do their work at read-time.

	function Maybe ( val ) {
	this.__val = val;
	this.__error = this.isError();
	this.__defaultVal = null;
	}

	Maybe.prototype.isError = function () {
	var val = this.__val;
	return (null === val)
	\|\| (undefined === val)

	var isArray = require( '../../src/checkers/isArray' ) // my function to test
	, JSC = require( 'jscheck' )
	, _ = require( 'lodash' )
	, $ = require( 'jquery' )
	, chai = require( 'chai' )
	, expect = chai.expect;

	function JSC_it ( name, predicate, signature ) {
	it( name, function ( done ) {
	JSC.claim( name, function ( verdict ) {

	13:15 <xQuasar> \| HASKELL IS FOR FUCKIN FAGGOTS. YOU'RE ALL A BUNCH OF
	\| FUCKIN PUSSIES
	13:15 <xQuasar> \| JAVASCRIPT FOR LIFE FAGS
	13:16 <luite> \| hello
	13:16 <ChongLi> \| somebody has a mental illness!
	13:16 <merijn> \| Wow...I suddenly see the error of my ways and feel
	\| compelled to write Node.js!
	13:16 <genisage> \| hi
	13:16 <luite> \| you might be pleased to learn that you can compile
	\| haskell to javascript now

	(ns typed-play.core
	(:require-macros [cljs.core.typed :as t])
	(:require [cljs.core.typed :as t]))

	(t/ann my-identity (All [x] (Fn [x -> x])))
	(defn my-identity [x]
	(if (number? x)
	(inc x)
	x))

	(ns localstorage)

	(defn set-item!
	"Set `key' in browser's localStorage to `val`."
	[key val]
	(.setItem (.-localStorage js/window) key val))

	(defn get-item
	"Returns value of `key' from browser's localStorage."
	[key]

	use std::rc::Rc;

	trait HKT<U> {
	type C; // Current type
	type T; // Type with C swapped with U
	}

	macro_rules! derive_hkt {
	($t:ident) => {
	impl<T, U> HKT<U> for $t<T> {

	var gulp = require('gulp');
	var sourcemaps = require('gulp-sourcemaps');
	var source = require('vinyl-source-stream');
	var buffer = require('vinyl-buffer');
	var browserify = require('browserify');
	var watchify = require('watchify');
	var babel = require('babelify');

	function compile(watch) {
	var bundler = watchify(browserify('./src/index.js', { debug: true }).transform(babel));