 (defun geiser-chibi--parameters ()
   "Return a list with all parameters needed to start Chibi Scheme.
 This function uses `geiser-chibi-init-file' if it exists."
-;;  `("--load" ,(expand-file-name "chibi/geiser/load.scm" geiser-scheme-dir))
   `("-I" ,(expand-file-name "chibi/geiser/" geiser-scheme-dir)
     "-m" "geiser")
   )

  ;; (case-sensitive geiser-chibi-case-sensitive-p)
  )

;; notes: (available-modules) in (chibi modules)
;; (env-exports (module-env (find-module '(scheme char)))), modules: (meta) (chibi modules) (chibi)

(geiser-impl--add-to-alist 'regexp "\\.scm$" 'chibi t)
(geiser-impl--add-to-alist 'regexp "\\.sld$" 'chibi t)

             (car (geiser-syntax--read-from-string module))
           (error :f)))
        (t :f)))

(defun geiser-chibi--symbol-begin (module)
  (if module
