let register_sig_item_parser f = sig_item_parser := f