107 |
produce_module_dump (FILE *file, lt_dlhandle handle) |
produce_module_dump (FILE *file, lt_dlhandle handle) |
108 |
{ |
{ |
109 |
lt_dlhandle pending = handle; |
lt_dlhandle pending = handle; |
110 |
const char *name = m4_module_name (pending); |
const char *name = m4_get_module_name (pending); |
111 |
|
|
112 |
handle = lt_dlhandle_next (handle); |
handle = lt_dlhandle_next (handle); |
113 |
if (handle) |
if (handle) |
131 |
const char *symbol_name = (const char *) m4_hash_iterator_key (place); |
const char *symbol_name = (const char *) m4_hash_iterator_key (place); |
132 |
m4_symbol *symbol = m4_hash_iterator_value (place); |
m4_symbol *symbol = m4_hash_iterator_value (place); |
133 |
lt_dlhandle handle = SYMBOL_HANDLE (symbol); |
lt_dlhandle handle = SYMBOL_HANDLE (symbol); |
134 |
const char *module_name = handle ? m4_module_name (handle) : NULL; |
const char *module_name = handle ? m4_get_module_name (handle) : NULL; |
135 |
const m4_builtin *bp; |
const m4_builtin *bp; |
136 |
|
|
137 |
switch (SYMBOL_TYPE (symbol)) |
switch (SYMBOL_TYPE (symbol)) |
153 |
|
|
154 |
case M4_TOKEN_FUNC: |
case M4_TOKEN_FUNC: |
155 |
bp = m4_builtin_find_by_func |
bp = m4_builtin_find_by_func |
156 |
(m4_module_builtins (SYMBOL_HANDLE (symbol)), |
(m4_get_module_builtin_table (SYMBOL_HANDLE (symbol)), |
157 |
SYMBOL_FUNC (symbol)); |
SYMBOL_FUNC (symbol)); |
158 |
|
|
159 |
if (bp == NULL) |
if (bp == NULL) |
459 |
if (number[2] > 0) |
if (number[2] > 0) |
460 |
{ |
{ |
461 |
while ((handle = lt_dlhandle_next (handle))) |
while ((handle = lt_dlhandle_next (handle))) |
462 |
if (strcmp (m4_module_name (handle), string[2]) == 0) |
if (strcmp (m4_get_module_name (handle), string[2]) == 0) |
463 |
break; |
break; |
464 |
|
|
465 |
if (handle) |
if (handle) |
466 |
{ |
{ |
467 |
bt = m4_module_builtins (handle); |
bt = m4_get_module_builtin_table (handle); |
468 |
} |
} |
469 |
} |
} |
470 |
|
|
663 |
|
|
664 |
if (number[2] > 0) |
if (number[2] > 0) |
665 |
while ((handle = lt_dlhandle_next (handle))) |
while ((handle = lt_dlhandle_next (handle))) |
666 |
if (strcmp (m4_module_name (handle), string[2]) == 0) |
if (strcmp (m4_get_module_name (handle), string[2]) == 0) |
667 |
break; |
break; |
668 |
|
|
669 |
bzero (&token, sizeof (m4_token)); |
bzero (&token, sizeof (m4_token)); |