Serialisierung F # Datensatztyp zu JSON enthält '@' Zeichen nach jeder Eigenschaft

Question

Der DataContractJsonSerializer erstellt JSON für F # Datensatztypen, die das '@' Zeichen nach jedem Eigenschaftsname enthält. Weiß jemand, ob es möglich ist, JSON zu erhalten, das dieses nachgestellte Symbol nicht hat?

{"heart_rate@":20,"latitude@":45.0,"longitude@":108.0,"name@":"Rambo"} 

Hier ist das Skript, das ich diese Probe zur Ausgabe verwenden

#r "System.Xml" 
#r "System.Runtime.Serialization" 

open System.Text 
open System.Runtime.Serialization.Json 
open System.IO 

type Update = { 
    name: string; 
    latitude: decimal; 
    longitude: decimal; 
    heart_rate: int} 

let update = {name = "Rambo"; latitude = 45.0m; longitude = 108.0m; heart_rate = 20} 

let serializer = new DataContractJsonSerializer(typeof<Update>) 

let stream = new MemoryStream() 
let data = serializer.WriteObject(stream, update) 
let updateData = stream.ToArray() 

let json = (Encoding.UTF8.GetString(updateData)) 

printfn "%s" json 

Answer 1

Obwohl Daniels Lösung korrekt funktioniert, ist es ziemlich mühsam, jeder Eigenschaft im Datensatz Attribute hinzuzufügen. Es stellt sich heraus, dass Json.NET mehr lesbare JSON out-of-the-box produziert. Für meine Anwendung muss ich den DataContractSerializer nicht speziell verwenden, also JSON.net ist es!

Answer 2

Es ist der Name der Compiler erzeugten Träger Felder verwenden. Sie können DataMemberAttribute verwenden, um Ihre eigenen Namen anzugeben.

[<DataContract>] 
type Update = { 
    [<field: DataMember(Name="name")>] 
    name: string; 
    [<field: DataMember(Name="latitude")>] 
    latitude: decimal; 
    [<field: DataMember(Name="longitude")>] 
    longitude: decimal; 
    [<field: DataMember(Name="heart_rate")>] 
    heart_rate: int}