thelinked

class StreamingBufferObject
{
public:
    StreamingBufferObject() : vbohandle(0), cursor(0) {}
    ~StreamingBufferObject()
    {
        if (vbohandle != 0) glDeleteBuffers(1, &vbohandle);
    }

    template<typename T>

thelinked

#pragma once
#include <queue>
#include <mutex>
#include <condition_variable>

template<typename T>
class LockingQueue
{
public:
    void push(T const& _data)

thelinked

open System
open System.Collections.Generic 

let brainfuck raw = 
    let code = [for c in raw -> c] |> Array.ofList
    let memory = Array.create 1024 0
    let createJumpTable = 
        let mutable stack = new Stack<char*int>()
        let mutable jumpTable = new Map<int,int>([])
        for i = 0 to (code.Length-1) do

thelinked

let START = []
let STOP = []
let _ = []
let inline morse c left right = left @ c::[] @ right

let inline SPACE    left right = morse ' ' left right
let inline (.-)     left right = morse 'A' left right
let inline (-...)   left right = morse 'B' left right
let inline (-.-.)   left right = morse 'C' left right
let inline (-..)    left right = morse 'D' left right

thelinked

    let split input = 
        let n = ((List.length input)/2)
        let rec splitHelper cur cont = function
            | head::tail when cur < n -> 
                splitHelper (cur+1) (fun acc -> 
                    cont (head::acc)) tail
            | rest -> cont [], rest
        splitHelper 0 id input

    let merge xs ys =