Agda2> (agda2-status-action "")
(agda2-info-action "*Type-checking*" "" nil)
(agda2-highlight-clear)
(agda2-info-action "*Type-checking*" "Checking Issue778 (Issue778.agda).\n" t)
(agda2-info-action "*Type-checking*" "Finished Issue778.\n" t)
(agda2-status-action "")
(agda2-info-action "*All Goals*" "?0 : ⊥\n?1 : ⊤\n" nil)
((last . 1) . (agda2-goals-action '(0 1)))
Agda2> ((last . 2) . (agda2-make-case-action-extendlam '("()")))
((last . 1) . (agda2-goals-action '(0 1)))
Agda2> ((last . 2) . (agda2-make-case-action-extendlam '("tt → ?")))
((last . 1) . (agda2-goals-action '(0 1)))
Agda2> (agda2-give-action 1 "tt")
(agda2-status-action "")
(agda2-info-action "*All Goals*" "?0 : ⊥\n" nil)
((last . 1) . (agda2-goals-action '(0)))
Agda2>