Mirrors/miller
1
0
Fork 0
mirror of https://github.com/johnkerl/miller.git synced 2026-07-30 03:01:39 +00:00
Code Issues Projects Releases Wiki Activity

write/append neaten

Browse source
This commit is contained in:
John Kerl 2016-07-24 22:43:29 -04:00
parent 1af5606d66
commit 14bae2d478
1 changed files with 3 additions and 19 deletions
Download patch file Download diff file Expand all files Collapse all files

22
c/mapping/mlr_dsl_cst.c
View file

@ -100,7 +100,6 @@ static void handle_emitp_lashed(mlr_dsl_cst_statement_t* s,
static void handle_emitp_lashed_to_file(mlr_dsl_cst_statement_t* s, variables_t* v, cst_outputs_t* o);
static void handle_emit_lashed(mlr_dsl_cst_statement_t* s, variables_t* v, cst_outputs_t* o);
static void handle_emit_lashed_to_file(mlr_dsl_cst_statement_t* s, variables_t* v, cst_outputs_t* o);
static void handle_emitp_all(mlr_dsl_cst_statement_t* s, variables_t* v, cst_outputs_t* o);
static void handle_emitp_all_to_file(mlr_dsl_cst_statement_t* s, variables_t* v, cst_outputs_t* o);
static void handle_emit_all(mlr_dsl_cst_statement_t* s, variables_t* v, cst_outputs_t* o);
static void handle_emit_all_to_file(mlr_dsl_cst_statement_t* s, variables_t* v, cst_outputs_t* o);
@ -917,9 +916,8 @@ static mlr_dsl_cst_statement_t* alloc_emit(mlr_dsl_ast_node_t* pnode, int type_i
}
pstatement->pemit_oosvar_namelist_evaluators = pemit_oosvar_namelist_evaluators;
pstatement->pnode_handler = do_full_prefixing
? handle_emit_all
: handle_emitp_all;
pstatement->do_full_prefixing = do_full_prefixing;
pstatement->pnode_handler = handle_emit_all;
} else if (pkeylist_node->type == MD_AST_NODE_TYPE_OOSVAR_KEYLIST) {
@ -2342,20 +2340,6 @@ static void handle_emit_lashed_to_file(
}
// ----------------------------------------------------------------
static void handle_emitp_all(
mlr_dsl_cst_statement_t* pnode,
variables_t* pvars,
cst_outputs_t* pcst_outputs)
{
int all_non_null_or_error = TRUE;
sllmv_t* pmvnames = evaluate_list(pnode->pemit_oosvar_namelist_evaluators, pvars, &all_non_null_or_error);
if (all_non_null_or_error) {
mlhmmv_all_to_lrecs(pvars->poosvars, pmvnames, pcst_outputs->poutrecs,
FALSE, pcst_outputs->oosvar_flatten_separator);
}
sllmv_free(pmvnames);
}
static void handle_emitp_all_to_file(
mlr_dsl_cst_statement_t* pnode,
variables_t* pvars,
@ -2395,7 +2379,7 @@ static void handle_emit_all(
sllmv_t* pmvnames = evaluate_list(pnode->pemit_oosvar_namelist_evaluators, pvars, &all_non_null_or_error);
if (all_non_null_or_error) {
mlhmmv_all_to_lrecs(pvars->poosvars, pmvnames, pcst_outputs->poutrecs,
TRUE, pcst_outputs->oosvar_flatten_separator);
pnode->do_full_prefixing, pcst_outputs->oosvar_flatten_separator);
}
sllmv_free(pmvnames);
}