static RULE* global_rule( char* rulename, module* m )
static RULE* global_rule( RULE* r )
static RULE* global_rule( char* rulename, module* m ){    char* name = global_name( rulename, m);    RULE* result = enter_rule( name, root_module() );    freestr(name);    return result;}