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

Function gen_any

src/gpre/languages/ada.cpp:602–620  ·  view source on GitHub ↗

Source from the content-addressed store, hash-verified

600//
601
602static void gen_any( const act* action, int column)
603{
604 align(column);
605 const gpre_req* request = action->act_request;
606
607 fprintf(gpreGlob.out_file, "%s_r (&%s, &%s",
608 request->req_handle, request->req_handle, request->req_trans);
609
610 const gpre_port* port = request->req_vport;
611 if (port)
612 {
613 for (const ref* reference = port->por_references; reference; reference = reference->ref_next)
614 {
615 fprintf(gpreGlob.out_file, ", %s", reference->ref_value);
616 }
617 }
618
619 fprintf(gpreGlob.out_file, ")");
620}
621
622
623//____________________________________________________________

Callers 1

ADA_actionFunction · 0.70

Calls 1

alignFunction · 0.70

Tested by

no test coverage detected