** find last 'next' field in list 'p' list (to add elements in its end) */
| 1007 | ** find last 'next' field in list 'p' list (to add elements in its end) |
| 1008 | */ |
| 1009 | static GCObject **findlast (GCObject **p) { |
| 1010 | while (*p != NULL) |
| 1011 | p = &(*p)->next; |
| 1012 | return p; |
| 1013 | } |
| 1014 | |
| 1015 | |
| 1016 | /* |