Function find_arrows_and_strs

common/splice_script.c:551–625

}

static struct splice_script_error *find_arrows_and_strs(const tal_t *ctx,
							struct token ***tokens_inout)
{
	struct token **input = *tokens_inout;
	struct token **tokens = tal_arr(ctx, struct token *, tal_count(input));
	struct token *token = NULL;
	size_t n = 0;

	for (size_t i = 0; i < tal_count(input); i++) {
		switch(input[i]->type) {
		case TOK_DELIMITER:
			if (token)
				tokens[n++] = token;
			token = NULL;
			tokens[n++] = tal_steal(tokens, input[i]);
			break;
		case TOK_CHAR:
			if (!token) {
				token = new_token(tokens, TOK_STR,
						  input[i]->script_index);
				token->str = tal_strdup(token, "");
			}
			tal_append_fmt(&token->str, "%c", input[i]->c);

			if (find_suffix(token->str, ARROW_SYMBOL)) {

				/* Terminmate the string at the arrow */
				*find_suffix(token->str, ARROW_SYMBOL) = 0;

				if (*token->str)
					tokens[n++] = token;
				else
					tal_free(token);
				token = NULL;

				tokens[n++] = new_token(tokens,
							TOK_ARROW,
							input[i]->script_index);
			}
			break;
		case TOK_ARROW:
		case TOK_STR:
		case TOK_PIPE:
		case TOK_ATSYM:
		case TOK_PLUS:
		case TOK_MINUS:
		case TOK_COLON:
		case TOK_SATS:
		case TOK_PERCENT:
		case TOK_QUESTION:
		case TOK_WILDCARD:
		case TOK_FEE:
		case TOK_CHANID:
		case TOK_WALLET:
		case TOK_FEERATE:
		case TOK_NODEID:
		case TOK_BTCADDR:
		case TOK_CHANQUERY: