Untitled

input:

namespace = My.Binary.Format;
language = f#;

record MyAwesomeData
{
    Id : int32;
    Name : string;
    Value1 : float32;
    value2 : ... etc...;
}


now some tool will translate this to ->


type MyAwesomeRecord = {
    Id : int;
    Name : string;
    Value1 : float32;
    Value2 : ... etc ...;
    }

let parseMyAwesomeData (reader : IProtocolReader) =
    let id = reader.ReadInt32 ()
    let name = reader.ReadString ()
    let value1 = reader.ReadSingle ()
    let value2 = ... etc ...
    let result = { Id = id, Name = name, Value1 = value1, Value2 = value2, ... etc ... }
    result