Skip to content

Instantly share code, notes, and snippets.

{-# language DeriveFunctor #-}
import Data.Functor.Fixedpoint
data E r =
Block [r] |
Define String (DefExpr r)
deriving (Functor, Show)
data DefExpr r =
Function [String] r
deriving (Functor, Show)
@haruhi-s
haruhi-s / flashG.sh
Created September 8, 2018 07:27
two flash scripts for my hhkb
sleep 5; ./dfu-programmer.exe atmega32u4 erase --force && ./dfu-programmer.exe atmega32u4 flash hhkbG_rn42.hex && ./dfu-programmer.exe atmega32u4 reset