mapvar iterate

This commit is contained in:
John Kerl 2016-10-27 21:20:35 -04:00
parent b95a108b05
commit fc7cef6427
3 changed files with 3 additions and 1 deletions

View file

@ -663,7 +663,7 @@ md_local_assignment(A) ::= md_local_variable(B) MD_TOKEN_ASSIGN(O) md_rhs(C). {
A = mlr_dsl_ast_node_alloc_binary(O->text, MD_AST_NODE_TYPE_LOCAL_ASSIGNMENT, B, C);
}
md_local_map_assignment(A) ::= md_indexed_local_variable(B) MD_TOKEN_ASSIGN(O) md_rhs(C). {
A = mlr_dsl_ast_node_alloc_binary(O->text, MD_AST_NODE_TYPE_LOCAL_ASSIGNMENT, B, C);
A = mlr_dsl_ast_node_alloc_binary(O->text, MD_AST_NODE_TYPE_LOCAL_MAP_ASSIGNMENT, B, C);
}
// ----------------------------------------------------------------

View file

@ -267,6 +267,7 @@ char* mlr_dsl_ast_node_describe_type(mlr_dsl_ast_node_type_t type) {
case MD_AST_NODE_TYPE_NON_SIGIL_NAME: return "NON_SIGIL_NAME"; break;
case MD_AST_NODE_TYPE_OPERATOR: return "OPERATOR"; break;
case MD_AST_NODE_TYPE_LOCAL_ASSIGNMENT: return "LOCAL_ASSIGNMENT"; break;
case MD_AST_NODE_TYPE_LOCAL_MAP_ASSIGNMENT: return "LOCAL_MAP_ASSIGNMENT"; break;
case MD_AST_NODE_TYPE_SREC_ASSIGNMENT: return "SREC_ASSIGNMENT"; break;
case MD_AST_NODE_TYPE_INDIRECT_SREC_ASSIGNMENT: return "INDIRECT_SREC_ASSIGNMENT"; break;
case MD_AST_NODE_TYPE_OOSVAR_ASSIGNMENT: return "OOSVAR_ASSIGNMENT"; break;

View file

@ -43,6 +43,7 @@ typedef enum _mlr_dsl_ast_node_type_t {
MD_AST_NODE_TYPE_NON_SIGIL_NAME,
MD_AST_NODE_TYPE_OPERATOR,
MD_AST_NODE_TYPE_LOCAL_ASSIGNMENT,
MD_AST_NODE_TYPE_LOCAL_MAP_ASSIGNMENT,
MD_AST_NODE_TYPE_SREC_ASSIGNMENT,
MD_AST_NODE_TYPE_INDIRECT_SREC_ASSIGNMENT,
MD_AST_NODE_TYPE_OOSVAR_ASSIGNMENT,