|
|
@ -242,9 +242,13 @@ writeMapBody(I, D, E, BinAcc) -> |
|
|
|
true -> |
|
|
|
case maps:next(I) of |
|
|
|
{K, V, none} -> |
|
|
|
<<BinAcc/binary, (writeTerm(K, -1, E))/binary, " => ", (writeTerm(V, D, E))/binary, "}">>; |
|
|
|
KeyTermBin = writeTerm(K, -1, E), |
|
|
|
ValueTermBin = writeTerm(V, -1, E), |
|
|
|
<<BinAcc/binary, KeyTermBin/binary, " => ", ValueTermBin/binary, "}">>; |
|
|
|
{K, V, NextI} -> |
|
|
|
writeMapBody(NextI, D - 1, E, <<BinAcc/binary, (writeTerm(K, -1, E))/binary, " => ", (writeTerm(V, D, E))/binary, ",">>); |
|
|
|
KeyTermBin = writeTerm(K, -1, E), |
|
|
|
ValueTermBin = writeTerm(V, -1, E), |
|
|
|
writeMapBody(NextI, D - 1, E, <<BinAcc/binary, KeyTermBin/binary, " => ", ValueTermBin/binary, ",">>); |
|
|
|
_ -> |
|
|
|
<<BinAcc/binary, "}">> |
|
|
|
end |
|
|
|