| 82 | /* back_edges structures. */ |
| 83 | |
| 84 | static back_edges * new_back_edges(void) |
| 85 | { |
| 86 | if (0 == back_edge_space) { |
| 87 | back_edge_space = (back_edges *) |
| 88 | GET_MEM(MAX_BACK_EDGE_STRUCTS*sizeof(back_edges)); |
| 89 | } |
| 90 | if (0 != avail_back_edges) { |
| 91 | back_edges * result = avail_back_edges; |
| 92 | avail_back_edges = result -> cont; |
| 93 | result -> cont = 0; |
| 94 | return result; |
| 95 | } |
| 96 | if (GC_n_back_edge_structs >= MAX_BACK_EDGE_STRUCTS - 1) { |
| 97 | ABORT("needed too much space for back edges: adjust " |
| 98 | "MAX_BACK_EDGE_STRUCTS"); |
| 99 | } |
| 100 | return back_edge_space + (GC_n_back_edge_structs++); |
| 101 | } |
| 102 | |
| 103 | /* Deallocate p and its associated continuation structures. */ |
| 104 | static void deallocate_back_edges(back_edges *p) |
no outgoing calls
no test coverage detected