Generate Vim dictionary file for Racket symbols

gen-symbols.rkt

#lang racket/base

;; In .vimrc, add the following config or equivalent:
;;    "au FileType scheme setlocal dict+=~/.racket-dict.vim" 
;;

;; Any (require ..) forms in this source file will impact symbols generated 
(require racket/gui/base)
(require racket/gui)
(require racket/draw)
(require file/resource)
(require racket/promise)
(require web-server/servlet
         web-server/servlet/servlet-structs
         web-server/http
         web-server/dispatch
         web-server/servlet-env)

(define list-o-symbols
  (sort
    (map symbol->string
         (namespace-mapped-symbols (current-namespace)))
    string<?))

(call-with-output-file* ".racket-dict.vim"
                        (lambda (out)
                          (for-each
                            (lambda (symbol) (displayln symbol out))
                            list-o-symbols))
                        #:exists 'replace)