Android Tutorial Convert collections to json and vice versa

The JSON libraries, which are internal libraries, were updated. The new version is 1.20.

There is a new JSON type which is used to convert maps or lists to json strings and vice versa, using the new As keyword.
The idea is that you have a collection or string, you direct the compiler to treat it as "JSON" and then convert it to a string or a collection.

It looks like this:

Dim m As Map = CreateMap("asdasd": Array(1, 2, 3, 4))

Dim s As String = m.As(JSON).ToString
'equivalent to:
Dim jg As JsonGenerator
jg.Initialize(m)
Dim s As String = jg.ToPrettyString(4)

'and the other direction:
Dim s As String =  $"{"aaa": "bbb"}"$

Dim m As Map = s.As(JSON).ToMap 'ignore
'equivalent to:
Dim jp As JsonParser
jp.Initialize(s)
Dim m As Map = jp.NextObject

It also works with Lists.

 

[Star-Dust]

You could also do this to switch from string to map

    Dim m As Map = $"{"aaa": "bbb"}"$.As(JSON).ToMap 'ignore
    Log(m)

Unfortunately, the vice versa does not work, from map to string

Dim s As String = CreateMap("asdasd": Array(1, 2, 3, 4)).As(JSON).ToString

 

[Erel]

That's true. It is related to the way CreateMap is implemented. You will need to set it to a variable first:

Dim m As Map =  CreateMap("asdasd": Array(1, 2, 3, 4))
Dim s As String = m.As(JSON).ToString

 

[Star-Dust]

maybe it could work like that. So as to put everything on one line

Dim s As String = MMap(CreateMap("asdasd": Array(1, 2, 3, 4))).As(JSON).ToString

Private Sub MMap(M As Map) As Map
   Return M
End Sub

 

[Nestor Castro Jr]

Hello Erel,

I think the iOS version you made available is still at 1.01 instead of 1.20 as indicated in the editor

 

[Erel]

Fixed.