Skip to content

Instantly share code, notes, and snippets.

View film42's full-sized avatar
✔️
Verified

Garrett Thornburg film42

✔️
Verified
View GitHub Profile
(ns prime)
;; (coll, n) -> coll'
(defn- prime-check [coll n]
(empty? (filter #(zero? (mod n %)) coll)))
(defn is-prime? [n]
(loop [prime-list [] value 2]
(cond
;; Have the list, check for prime
(ns hn.realtime
(:require [cheshire.core :refer :all]))
(def base-url "https://hacker-news.firebaseio.com/v0")
(defn get-updates
"Return response regardless of condition"
[] (parse-string (slurp (str base-url "/updates.json")) true))
(defprotocol IPoller
package id3
/**
* Created by: film42 on: 3/6/15.
*/
object DecisionTreeUtils {
type Vector[A] = List[A]
type Matrix[A] = List[Vector[A]]
require 'thread'
##
## THREADING EXAMPLE
##
## Ruby's array append is not "thread safe." This means that real
## concurrency models will have collision issues. This is not a good
## thing, but we'll find we can use real threading constructs to
## protect code that isn't "thread safe." Run this code on MRI and
## then try running this in jRuby and compare the results.
@film42
film42 / output
Last active August 29, 2015 14:19
$ film42@mbp ~/D/D/S/C/t/a/build (master)>
valgrind --leak-check=full --dsymutil=yes ./avl_tree_tests
==65466== Memcheck, a memory error detector
==65466== Copyright (C) 2002-2013, and GNU GPL'd, by Julian Seward et al.
==65466== Using Valgrind-3.11.0.SVN and LibVEX; rerun with -h for copyright info
==65466== Command: ./avl_tree_tests
==65466==
--65466-- run: /usr/bin/dsymutil "./avl_tree_tests"
Running test: Contains Tests
Malloc'd tree
-module(erlish).
-export([init/0, manager/1, get/1, set/2, keys/0, del/1, expire/2]).
manager(State) ->
receive
{get, Key, Sender} ->
Value = case maps:is_key(Key, State) of
true ->
maps:get(Key, State);
_ ->
@film42
film42 / xv6-setup-yosemite.sh
Last active September 28, 2020 12:10
Get xv6 running with QEMU on OSX Yosemite
#! /usr/bin/env bash
# Get xv6 working with OSX Yosemite
# Most things were here: https://doesnotscale.com/compiling-xv6-on-os-x-10-9/
# You need homebrew installed to make this thing work
brew tap homebrew/versions && brew install gcc48
brew deps qemu | xargs brew install
export PATH=/usr/local/bin:$PATH
export CC=/usr/local/bin/gcc-4.8
brew install wget
;;; dracula-theme.el --- Emacs 24 theme with a dark background.
;; Author: film42
;;
;; Version: 0.1
;; Package-Requires: ((emacs "24"))
;; This program is free software: you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or
class BashQueue
FIFO_QUEUE = '/tmp/channel'
# Setup fifo queue called channel
def self.ensure_setup!
unless ::File.exist?(FIFO_QUEUE)
`mkfifo #{FIFO_QUEUE}`
end
end
require "nats/client"
def get_request
start = nil
NATS.start(:servers => ['nats://198.199.103.139:4222']) do
start = Time.now
NATS.subscribe('demo') do |msg, reply|
NATS.publish(reply, "Polo!")