bdw

#!/usr/bin/env nqp-m

my int $i := 0;
sub foo (int $x) {
    if (nqp::cmp_i($x, 50) > 0) {
       nqp::say("$x: OH HAI");
    } else {
       nqp::say("$x: OH NOES");
    }
}

bdw

#!/bin/bash


for id in `docker ps -a | cut -c 1-20 | grep -v 'CONTAINER ID'`; do docker rm -f $id; done
if [ "$1" = "-a" ]; then
    for id in `docker images | cut -c 41-60 | grep -v 'IMAGE ID'`; do docker rmi -f $id; done
fi

bdw

int * foo(void) {
    int a = 4;
    return &a;
}

int main() {
    int a[5];
    a[1] = 3; /* we assign something to the location a[1] */
    printf("%d\n", a[0]); /* and now we read from the (uninitialized) location a[0] */

bdw

Why this is a problem

I need to generate a transition state table. To do that, I find the combinations of rules that can be applied to a given rule. Before I can do that, note that nested rules are replaced by 'accented' values:

(tile: at (a (t)) r) becomes
(tile: at2 (t) t')
(tile: at (a t') r)

Hence, according to this, the (t) node can generate both r and t', and this is indistinguishable form the perspective of the (t) node.

bdw

#!/usr/bin/perl
use Data::Dumper;
use strict;
use warnings;
use sexpr;


sub sortn {
    sort { $a <=> $b } @_;
}

bdw

<?php

class Dictionary {
  var $file;
  var $index;
  var $current;

  function Dictionary($file) {
    $this->file = $file;
    $this->index = array();

bdw

package main

import (
	"fmt"
	"strconv"
	"io"
	"encoding/binary"
)

type BinaryTree struct {

bdw

import random
import io
import time


def profile(func):
    def wrapper(*args):
        start = time.clock()
        rv = func(*args)
        end = time.clock()

bdw

#!/usr/bin/env python
import argparse
import numpy 
import pygame
pygame.init()
from pygame.locals import QUIT # Dat deze uit z'n namespace moet is echt stom


# 3 regels:
# 1. Levende cellen met minder dan 2 levende buren gaan dood

bdw

function calculateVolume(heights) {
	var left = 0, right = 1, volume = 0;
	while (right < heights.length) {
		var level = heights[left];
		if (heights[right] <= level) {
			// tag the 'left cursor' along
			left = right;
			right = right + 1;
		} else {