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

Function gen_endfor

src/gpre/languages/ada.cpp:1669–1680  ·  view source on GitHub ↗

Source from the content-addressed store, hash-verified

1667//
1668
1669static void gen_endfor( const act* action, int column)
1670{
1671 gpre_req* request = action->act_request;
1672
1673 if (request->req_sync)
1674 gen_send(action, request->req_sync, column + INDENT);
1675
1676 printa(column, "end loop;");
1677
1678 if (action->act_error || (action->act_flags & ACT_sql))
1679 endif(column);
1680}
1681
1682
1683//____________________________________________________________

Callers 1

ADA_actionFunction · 0.70

Calls 3

gen_sendFunction · 0.70
printaFunction · 0.70
endifFunction · 0.70

Tested by

no test coverage detected