(agda2-status-action "")
(agda2-info-action "*Type-checking*" "" nil)
(agda2-highlight-clear)
(agda2-status-action "")
(agda2-info-action "*All Goals*" "?0 : Nat ?1 : Vec A (suc n) " nil)
((last . 1) . (agda2-goals-action '(0 1)))
((last . 2) . (agda2-make-case-action '("test {m} {n = zero} = ?" "test {m} {n = suc n} = ?")))
((last . 1) . (agda2-goals-action '(0 1)))
((last . 2) . (agda2-make-case-action '("foo (_∷_ {n = suc n} x xs) = ?")))
((last . 1) . (agda2-goals-action '(0 1)))
