Method get_ubjson_array

Source/external/json.hpp:11556–11659

! @return whether array creation completed */

	@return whether array creation completed
	*/
	bool get_ubjson_array()
	{
		std::pair<std::size_t, char_int_type> size_and_type;
		if (JSON_HEDLEY_UNLIKELY(!get_ubjson_size_type(size_and_type)))
		{
			return false;
		}

		// if bit-8 of size_and_type.second is set to 1, encode bjdata ndarray as an object in JData annotated array format (https://github.com/NeuroJSON/jdata):
		// {"_ArrayType_" : "typeid", "_ArraySize_" : [n1, n2, ...], "_ArrayData_" : [v1, v2, ...]}

		if (input_format == input_format_t::bjdata && size_and_type.first != npos && (size_and_type.second & (1 << 8)) != 0)
		{
			size_and_type.second &= ~(static_cast<char_int_type>(1) << 8);  // use bit 8 to indicate ndarray, here we remove the bit to restore the type marker
			auto it = std::lower_bound(bjd_types_map.begin(), bjd_types_map.end(), size_and_type.second, [](const bjd_type & p, char_int_type t)
			{
				return p.first < t;
			});
			string_t key = "_ArrayType_";
			if (JSON_HEDLEY_UNLIKELY(it == bjd_types_map.end() || it->first != size_and_type.second))
			{
				auto last_token = get_token_string();
				return sax->parse_error(chars_read, last_token, parse_error::create(112, chars_read,
										exception_message(input_format, "invalid byte: 0x" + last_token, "type"), nullptr));
			}

			string_t type = it->second; // sax->string() takes a reference
			if (JSON_HEDLEY_UNLIKELY(!sax->key(key) || !sax->string(type)))
			{
				return false;
			}

			if (size_and_type.second == 'C')
			{
				size_and_type.second = 'U';
			}

			key = "_ArrayData_";
			if (JSON_HEDLEY_UNLIKELY(!sax->key(key) || !sax->start_array(size_and_type.first) ))
			{
				return false;
			}

			for (std::size_t i = 0; i < size_and_type.first; ++i)
			{
				if (JSON_HEDLEY_UNLIKELY(!get_ubjson_value(size_and_type.second)))
				{
					return false;
				}
			}

			return (sax->end_array() && sax->end_object());
		}

		if (size_and_type.first != npos)
		{
			if (JSON_HEDLEY_UNLIKELY(!sax->start_array(size_and_type.first)))
			{