Newbie GNATCOLL question

Newbie GNATCOLL question

[reinert]

Hi,
  
GNATCOLL.JSON question:

I want to test if an object "state" (JSON_Value) is like "{"name":"blabla"}"
which is almost an empty (sub-)object and which I want to avoid to include
in the (super-)object "cell".

The following  code/hack works:

------------------------------------------------------------
declare
   a : constant JSON_Value := Clone(state);
begin
   a.unset_field(Field_Name => "name");
   if not a.is_empty then
      cell.Set_Field(Field_Name => "state",Field => state);
   end if;
end;
-------------------------------------------------------------

I assume this is clumsy. Is there a shorter way?

reinert