;;; lang/fsharp/config.el -*- lexical-binding: t; -*-

(after! fsharp-mode
  (when (executable-find "dotnet")
    (setq inferior-fsharp-program "dotnet fsi --readline-"))
  (if (modulep! +lsp)
      (progn
        (setq fsharp-ac-intellisense-enabled nil)
        (add-hook 'fsharp-mode-local-vars-hook #'lsp! 'append))
    (setq fsharp-ac-use-popup nil) ; Use a buffer for docs rather than a pop-up
    (set-lookup-handlers! 'fsharp-mode :async t :definition #'fsharp-ac/gotodefn-at-point)
    (set-company-backend! 'fsharp-mode 'fsharp-ac/company-backend))
  (set-repl-handler! 'fsharp-mode #'run-fsharp)
  (set-formatter! 'fantomas '("fantomas" "--stdin") :modes '(fsharp-mode))
  (map! :localleader
        :map fsharp-mode-map
        "b" #'fsharp-ac/pop-gotodefn-stack ; Useful for re-tracing your steps
        "e" #'fsharp-eval-region
        "l" #'fsharp-load-buffer-file
        (:unless (modulep! +lsp)
         "q" #'fsharp-ac/stop-process
         "t" #'fsharp-ac/show-tooltip-at-point)))