| 25 | |
| 26 | |
| 27 | module_t * bindmodule( OBJECT * name ) |
| 28 | { |
| 29 | if ( !name ) |
| 30 | return &root; |
| 31 | |
| 32 | { |
| 33 | PROFILE_ENTER( BINDMODULE ); |
| 34 | |
| 35 | module_t * m; |
| 36 | int found; |
| 37 | |
| 38 | if ( !module_hash ) |
| 39 | module_hash = hashinit( sizeof( module_t ), "modules" ); |
| 40 | |
| 41 | m = (module_t *)hash_insert( module_hash, name, &found ); |
| 42 | if ( !found ) |
| 43 | { |
| 44 | m->name = object_copy( name ); |
| 45 | m->variables = 0; |
| 46 | m->variable_indices = 0; |
| 47 | m->num_fixed_variables = 0; |
| 48 | m->fixed_variables = 0; |
| 49 | m->rules = 0; |
| 50 | m->imported_modules = 0; |
| 51 | m->class_module = 0; |
| 52 | m->native_rules = 0; |
| 53 | m->user_module = 0; |
| 54 | } |
| 55 | |
| 56 | PROFILE_EXIT( BINDMODULE ); |
| 57 | |
| 58 | return m; |
| 59 | } |
| 60 | } |
| 61 | |
| 62 | |
| 63 | /* |
no test coverage detected