let loc_var_visible fm var = let key = PdgIndex.Key.decl_var_key var in key_visible "loc_var_visible" fm key