Agda2> (agda2-status-action "") (agda2-info-action "*Type-checking*" "" nil) (agda2-highlight-clear) (agda2-info-action "*Type-checking*" "Checking Issue564 (Issue564.agda).\n" t) (agda2-info-action "*Type-checking*" "Finished Issue564.\n" t) (agda2-status-action "") (agda2-info-action "*All Goals*" "?0 : P a\n" nil) ((last . 1) . (agda2-goals-action '(0))) Agda2> (agda2-status-action "") (agda2-info-action "*Current Goal*" "P a" nil) ((last . 1) . (agda2-goals-action '(0))) Agda2>