** sweep a list until a live object (or end of list) */
| 841 | ** sweep a list until a live object (or end of list) |
| 842 | */ |
| 843 | static GCObject **sweeptolive (lua_State *L, GCObject **p) { |
| 844 | GCObject **old = p; |
| 845 | do { |
| 846 | p = sweeplist(L, p, 1, NULL); |
| 847 | } while (p == old); |
| 848 | return p; |
| 849 | } |
| 850 | |
| 851 | /* }====================================================== */ |
| 852 |
no test coverage detected