| 2964 | // |
| 2965 | |
| 2966 | static void gen_routine( const act* action, int column) |
| 2967 | { |
| 2968 | column += INDENT; |
| 2969 | |
| 2970 | for (const gpre_req* request = (gpre_req*) action->act_object; request; |
| 2971 | request = request->req_routine) |
| 2972 | { |
| 2973 | if (request->req_type == REQ_any) |
| 2974 | continue; |
| 2975 | for (const gpre_port* port = request->req_ports; port; port = port->por_next) |
| 2976 | make_port(port, column); |
| 2977 | for (const blb* blob = request->req_blobs; blob; blob = blob->blb_next) |
| 2978 | { |
| 2979 | printa(column, "isc_blob_handle\t\tisc_%d;\t\t/* blob handle */", blob->blb_ident); |
| 2980 | printa(column, "char\t\t\tisc_%d [%d];\t/* blob segment */", |
| 2981 | blob->blb_buff_ident, blob->blb_seg_length); |
| 2982 | printa(column, "unsigned short\tisc_%d;\t\t/* segment length */", blob->blb_len_ident); |
| 2983 | } |
| 2984 | } |
| 2985 | } |
| 2986 | |
| 2987 | |
| 2988 | //____________________________________________________________ |
no test coverage detected