anchor.diff:         (editor-error "~A" (godef-error file)))
         (t
          (godef-parse file)))))
  +
  +(define-command godef-describe () ()
  +  (let ((description (nth-value 1 (call-godef (current-point)))))
  +    (when description
  +      (message "~{~A~%~}" description))))
   
   (defun parse-gocode (text)
     (let ((json (yason:parse text)))
  
positive.code:                                   :output out
                                    :ignore-error-status t)))))
        (with-input-from-string (in text)
          (values (read-line in nil))))))
  
  (defun godef-successful-p (output)
    (not (or (string= "-" output)
  
negative.code:                (point<= (overlay-start ov) (current-point))
                 (point<= (current-point) (overlay-end ov)))
        (message "~A" (overlay-get ov 'message))
        (return t))))
  
  (defun go-idle-function ()
    (or (goflymake-message)
        (godef-describe)))
  
  (add-hook *after-save-hook*
            (lambda (buffer)
  