F# dict serialization error with SharpYaml

serialize.fsx

#r "nuget: SharpYaml"
open SharpYaml.Serialization

let serializer = Serializer()

let myRecord1 = {|
    dict1 = ["key", "value"] |> dict
    dict2 = ["differentKey", "differentValue"] |> dict
|}

let myRecord2 = {|
    dict1 = ["key", "value"] |> dict
    dict2 = ["key", "value"] |> dict
|}

serializer.Serialize(myRecord1) |> printf "%s\n" 
serializer.Serialize(myRecord2) |> printf "%s\n" 

// Requires .NET 5 preview installed
// Execute script with: dotnet fsi --langversion:preview serialize.fsx

❯ dotnet fsi --langversion:preview .\serialize.fsx
dict1:
  key: value
dict2:
  differentKey: differentValue

dict1:
  *o2: *o3
dict2: &o2
  *o2: *o3

myRecord1 with different key value pairs for the two dictionaries gets serialized correctly. The myRecord2 where both dictionaries contain the same key/value pair, the serialization output is gibberish.

How to get the serialization to work for myRecord2?

Note: The problem exists with .NET Core 3.1 and an *.fsproj instead of the fsi, too.

you need to disable alias in the settings https://github.com/xoofx/SharpYaml/blob/d7b65191c5b8969a508caf2df29b027461ff7f5a/src/SharpYaml/Serialization/SerializerSettings.cs#L125

With the solution provided by xoof, the final code looks like this:

#r "nuget: SharpYaml"
open SharpYaml.Serialization

// Set "EmitAlias" to false
let settings = SerializerSettings()
settings.EmitAlias <- false

let serializer = Serializer(settings)

let myRecord1 = {|
    dict1 = ["key", "value"] |> dict
    dict2 = ["differentKey", "differentValue"] |> dict
|}

let myRecord2 = {|
    dict1 = ["key", "value"] |> dict
    dict2 = ["key", "value"] |> dict
|}

serializer.Serialize(myRecord1) |> printf "%s\n" 
serializer.Serialize(myRecord2) |> printf "%s\n" 

// Requires .NET 5 preview installed
// Execute script with: dotnet fsi --langversion:preview serialize.fsx

Result:

❯ dotnet fsi --langversion:preview .\serialize.fsx
dict1:
  key: value
dict2:
  differentKey: differentValue

dict1:
  key: value
dict2:
  key: value