Function check_example_6

ccan/ccan/graphql/test/run.c:344–400

}

void check_example_6(char *source) {
	struct list_head *tokens;
	struct graphql_token *tok;

	if (!mute) printf("// Example No. 6\n");

	sprintf(source, "\
{\n\
  field\n\
}\n\
	");

	// Test the lexer.
	TEST_CONT(graphql_lex(NULL, source, &tokens) == NULL);
	TEST_ABRT(listlen(tokens) == 3);
	tok = list_pop(tokens, struct graphql_token, node);
	TEST_CONT(tok->token_type == '{');
	tok = list_pop(tokens, struct graphql_token, node);
	TEST_CONT(tok->token_type == 'a');
	TEST_STRG(tok->token_string, "field");
	TEST_CONT(tok->source_line == 2);
	TEST_CONT(tok->source_column == 3);
	TEST_CONT(tok->source_len == 5);
	tok = list_pop(tokens, struct graphql_token, node);
	TEST_CONT(tok->token_type == '}');
	tok = list_pop(tokens, struct graphql_token, node);
	TEST_CONT(tok == NULL);
	tokens = tal_free(tokens);

	// Test the parser.
	struct graphql_executable_document *doc;
	TEST_CONT(graphql_lex(NULL, source, &tokens) == NULL);
	TEST_ABRT(graphql_parse(tokens, &doc) == NULL);
	TEST_ABRT(doc != NULL);
	TEST_ABRT(doc->first_def != NULL);
	TEST_CONT(doc->first_def->next_def == NULL);
	TEST_CONT(doc->first_def->frag_def == NULL);
	TEST_ABRT(doc->first_def->op_def != NULL);
	TEST_CONT(doc->first_def->op_def->op_type == NULL);
	TEST_ABRT(doc->first_def->op_def->op_name == NULL);
	TEST_CONT(doc->first_def->op_def->vars == NULL);
	TEST_CONT(doc->first_def->op_def->directives == NULL);
	TEST_ABRT(doc->first_def->op_def->sel_set != NULL);
	TEST_ABRT(doc->first_def->op_def->sel_set->first != NULL);
	TEST_CONT(doc->first_def->op_def->sel_set->first->next == NULL);
	TEST_CONT(doc->first_def->op_def->sel_set->first->frag_spread == NULL);
	TEST_CONT(doc->first_def->op_def->sel_set->first->inline_frag == NULL);
	TEST_ABRT(doc->first_def->op_def->sel_set->first->field != NULL);
	TEST_CONT(doc->first_def->op_def->sel_set->first->field->alias == NULL);
	TEST_ABRT(doc->first_def->op_def->sel_set->first->field->name != NULL);
	TEST_CONT(doc->first_def->op_def->sel_set->first->field->name->token_type == 'a');
	TEST_STRG(doc->first_def->op_def->sel_set->first->field->name->token_string, "field");
	TEST_CONT(doc->first_def->op_def->sel_set->first->field->args == NULL);
	TEST_CONT(doc->first_def->op_def->sel_set->first->field->directives == NULL);
	TEST_CONT(doc->first_def->op_def->sel_set->first->field->sel_set == NULL);
	tokens = tal_free(tokens);
}