| BCJmp Int
| BCJmpT Int
| BCJmpF Int
+ //Serial
+ | BCSerialAvail
+ | BCSerialPrint
+ | BCSerialPrintln
+ | BCSerialRead
+ | BCSerialParseInt
+ //Pins
+ | BCAnalogRead AnalogPin
+ | BCAnalogWrite AnalogPin
//:: ByteCode a p = BC (BCState -> ([BC], BCState))
:: ByteCode a p = BC [BC]