Skip to content

Instantly share code, notes, and snippets.

type ParserState = {
InHeader: bool
Command: string
Checksum: int
PayloadLength: int
Data: byte[]
}
type BitcoinMessageParser(networkData: IObservable<byte[]>) =
let headerLen = 24