; docformat = 'rst' ;+ ; Routine marked as obsolete by COMPILE_OPT. ;- pro mg_obsolete_routine compile_opt strictarr, obsolete print, 'Execution reached inside MG_OBSOLETE_ROUTINE' end ; main-level example mg_obsolete_routine print, 'Execution reached past MG_OBSOLETE_ROUTINE' end