| 104 | } |
| 105 | |
| 106 | void Stack_popToMark_(Stack *self, intptr_t mark) { |
| 107 | while (self->lastMark && self->lastMark != mark) { |
| 108 | Stack_popMark(self); |
| 109 | } |
| 110 | |
| 111 | if (self->lastMark == 0) { |
| 112 | printf("Stack error: unable to find mark %p in %p\n", (void *)mark, |
| 113 | (void *)self); |
| 114 | exit(1); |
| 115 | } |
| 116 | |
| 117 | Stack_popMark(self); |
| 118 | } |
| 119 | |
| 120 | List *Stack_asList(const Stack *self) // slow |
| 121 | { |
nothing calls this directly
no test coverage detected