| 322 | /* free pointer array */ |
| 323 | |
| 324 | static void free_pointer_array(reg1 POINTER_ARRAY *pa) |
| 325 | { |
| 326 | if (pa->typelib.count) |
| 327 | { |
| 328 | pa->typelib.count=0; |
| 329 | my_free(pa->typelib.type_names); |
| 330 | pa->typelib.type_names=0; |
| 331 | my_free(pa->str); |
| 332 | } |
| 333 | return; |
| 334 | } /* free_pointer_array */ |
| 335 | |
| 336 | |
| 337 | /* Code for replace rutines */ |