   "Tells you if a ycmd server is already running."
   (interactive)
   (if (get-process ycmd--server-process) 't nil))
+
+(defun ycmd--keepalive ()
+  "Sends an unspecified message to the server.
+
+This is simply for keepalive functionality."
+  (ycmd--request "/healthy" '() :type "GET"))
 
 (defun ycmd-load-conf-file (filename)
   "Tell the ycmd server to load the configuration file FILENAME."


(defun ycmd--on-find-file ()
  (when (ycmd--major-mode-to-file-types major-mode)
    (unless (ycmd-running?) (ycmd-open))
    (ycmd-notify-file-ready-to-parse)))

(add-hook 'find-file-hook 'ycmd--on-find-file)

unmodified contents of the response (i.e. not JSON-decoded or
anything like that.)
"
  (unless (ycmd-running?) (ycmd-open))
  
  (lexical-let* ((request-backend 'url-retrieve)
                 (content (json-encode content))
                 (hmac (ycmd--hmac-function content ycmd--hmac-secret))
