Skip to content

Instantly share code, notes, and snippets.

View dps-box.stl
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
View nma.hs
{-# LANGUAGE OverloadedStrings #-}
module NMA where
import Control.Lens
import Control.Monad (guard)
import Data.Semigroup ((<>))
import Network.Wreq (post, FormParam(..), responseBody, responseStatus, statusCode)
import Text.Read (readEither)
import qualified Data.ByteString as BS
@dustin
dustin / Dockerfile
Created Nov 1, 2017
Dockerfile for arm linux haskell build environment.
View Dockerfile
# FROM arm32v7/debian:stretch
FROM resin/rpi-raspbian:stretch
ENV QEMU_SET_ENV=QEMU_CPU=cortex-a9
RUN apt-get update
RUN apt-get install -y netbase curl llvm-3.7 # haskell-stack
RUN curl -sSL https://get.haskellstack.org/ | sh
COPY stack-entry /bin/stack-entry
VOLUME /root
View cura-pla.ini
[profile]
layer_height = 0.2
wall_thickness = 1.2
retraction_enable = True
solid_layer_thickness = 0.9
fill_density = 15
print_speed = 40
print_temperature = 200
print_temperature2 = 0
print_temperature3 = 0
View ...and results with inlining disabled:
$ go test -gcflags=-l -bench=.
testing: warning: no tests to run
PASS
BenchmarkDirect-4 500000000 3.36 ns/op
BenchmarkInterface-4 1000000000 3.46 ns/op
ok misc/intb 5.830s
View timeout.c
volatile bool tx_sumd = false;
volatile bool timedout = false;
// Set tx_sumd = true every 10ms
void initSUMDTimer() {
cli();
TCCR1A = 0;
TCCR1B = 0;
TCNT1 = 0;
View categorizer.go
package main
import (
"encoding/csv"
"fmt"
"io"
"log"
"math"
"os"
"path"
@dustin
dustin / README.md
Last active Aug 29, 2015
WS2812 demo with 13 LEDs
View README.md
@dustin
dustin / README.md
Last active Aug 29, 2015
WS2812 Capture from strandtest
View README.md
@dustin
dustin / README.md
Last active Aug 29, 2015
WS2812 Capture from strandtest
View README.md
You can’t perform that action at this time.