 May be one of “z3” (search in $PATH), an absolute path, or a
 function taking a string (the full path to the F* executable) and
 returning a string (the full path to the SMT solver)."
+  :group 'fstar
+  :type 'file
+  :risky t)
+
+(defvaralias 'flycheck-fstar-literate-executable 'fstar-python-executable)
+
+(defcustom fstar-python-executable "python"
+  "Where to find Python (preferably 3).
+Can be \"python\" or \"python3\", or an absolute path."
   :group 'fstar
   :type 'file
   :risky t)

      :face (if enabled 'success '(bold error))))))

(flycheck-define-command-checker 'fstar-literate
  "Flycheck checker for F*."
  :command '("python"
             (eval (expand-file-name "etc/fslit/lint.py" fstar--directory))
             "--stdin-filename" source-original

                      (flycheck-python-verify-module 'fstar-literate "docutils"))))
  :modes '(fstar-mode fstar-literate--rst-mode))

(add-to-list 'flycheck-checkers 'fstar-literate)
(cl-pushnew 'fstar-literate--rst-mode (flycheck-checker-get 'rst-sphinx 'modes))

