MCPcopy Create free account
hub / github.com/FirebirdSQL/firebird / gen_store

Function gen_store

src/gpre/languages/ada.cpp:2966–2982  ·  view source on GitHub ↗

Source from the content-addressed store, hash-verified

2964//
2965
2966static void gen_store( const act* action, int column)
2967{
2968 gpre_req* request = action->act_request;
2969 gen_compile(action, column);
2970 if (action->act_error || (action->act_flags & ACT_sql))
2971 make_ok_test(action, request, column);
2972
2973 // Initialize any blob fields
2974 TEXT name[MAX_REF_SIZE];
2975 const gpre_port* port = request->req_primary;
2976 for (const ref* reference = port->por_references; reference; reference = reference->ref_next)
2977 {
2978 const gpre_fld* field = reference->ref_field;
2979 if (field->fld_flags & FLD_blob)
2980 printa(column, "%s := firebird.null_blob;", gen_name(name, reference, true));
2981 }
2982}
2983
2984
2985//____________________________________________________________

Callers 1

ADA_actionFunction · 0.70

Calls 4

gen_compileFunction · 0.70
make_ok_testFunction · 0.70
printaFunction · 0.70
gen_nameFunction · 0.70

Tested by

no test coverage detected