hptAnns hsc_env Nothing = hptAllThings (md_anns . hm_details) hsc_env
hptAnns hsc_env Nothing = hptAllThings (md_anns . hm_details) hsc_env
hptAnns hsc_env Nothing = hptAllThings (md_anns . hm_details) hsc_env