global-functions: $ParseJson: prepare elif-workaround

This commit is contained in:
Christian Hesse 2023-10-16 23:39:27 +02:00
parent 140ec1a3a2
commit 3b9df48721

View file

@ -714,13 +714,16 @@
:set $Skip ($Skip - 1); :set $Skip ($Skip - 1);
} }
} else={ } else={
:local Done false;
:local Key ($Input->$I); :local Key ($Input->$I);
:local Val1 ($Input->($I + 1)); :local Val1 ($Input->($I + 1));
:local Val2 ($Input->($I + 2)); :local Val2 ($Input->($I + 2));
:if ($Val1 = ":") do={ :if ($Val1 = ":") do={
:set ($Return->$Key) $Val2; :set ($Return->$Key) $Val2;
:set Skip 2; :set Skip 2;
} else={ :set Done true;
}
:if ($Done = false) do={
:set ($Return->$Key) [ :pick $Val1 1 [ :len $Val1 ] ]; :set ($Return->$Key) [ :pick $Val1 1 [ :len $Val1 ] ];
:set Skip 1; :set Skip 1;
} }