| 2981 | // |
| 2982 | |
| 2983 | static void gen_routine( const act* action, int column) |
| 2984 | { |
| 2985 | column += INDENT; |
| 2986 | |
| 2987 | for (const gpre_req* request = (gpre_req*) action->act_object; request; |
| 2988 | request = request->req_routine) |
| 2989 | { |
| 2990 | if (request->req_type == REQ_any) |
| 2991 | continue; |
| 2992 | for (const gpre_port* port = request->req_ports; port; port = port->por_next) |
| 2993 | make_port(port, column); |
| 2994 | for (const blb* blob = request->req_blobs; blob; blob = blob->blb_next) |
| 2995 | { |
| 2996 | printa(column, "isc_blob_handle\t\tfb_%d;\t\t/* blob handle */", blob->blb_ident); |
| 2997 | printa(column, "char\t\t\tfb_%d [%d];\t/* blob segment */", |
| 2998 | blob->blb_buff_ident, blob->blb_seg_length); |
| 2999 | printa(column, "unsigned short\tfb_%d;\t\t/* segment length */", blob->blb_len_ident); |
| 3000 | } |
| 3001 | } |
| 3002 | } |
| 3003 | |
| 3004 | |
| 3005 | //____________________________________________________________ |
no test coverage detected