4990
((3) 0 () 2 ((c submod c (? . 1) q configure) (q lib "expeditor/main.rkt")) () (h ! (equal) ((c def c (c (? . 0) q ee-id-completion/indent/reverse)) q (1301 . 5)) ((c def c (c (? . 0) q ee-command-repeat)) q (6880 . 5)) ((c def c (c (? . 0) q ee-delete-exp)) q (5409 . 5)) ((c def c (c (? . 0) q ee-history-fwd-prefix)) q (6644 . 5)) ((c def c (c (? . 0) q ee-history-fwd-contains)) q (6761 . 5)) ((c def c (c (? . 0) q ee-delete-char)) q (4253 . 5)) ((c def c (c (? . 0) q ee-yank-selection)) q (5636 . 5)) ((c def c (c (? . 1) q expeditor-init-file-path)) q (8973 . 2)) ((c def c (c (? . 1) q expeditor-error-display)) q (10463 . 3)) ((c def c (c (? . 0) q ee-set-mark)) q (4024 . 5)) ((c def c (c (? . 0) q ee-transpose-char)) q (3686 . 5)) ((c def c (c (? . 0) q expeditor-bind-key!)) q (0 . 4)) ((c def c (c (? . 1) q current-expeditor-indenter)) q (9910 . 4)) ((c def c (c (? . 1) q current-expeditor-reader)) q (9021 . 4)) ((c def c (c (? . 1) q expeditor-open)) q (8423 . 3)) ((c def c (c (? . 0) q ee-backward-delete-exp)) q (5518 . 5)) ((c def c (c (? . 0) q current-ee-forward-history-point)) q (8227 . 5)) ((c def c (c (? . 0) q ee-forward-word)) q (2100 . 5)) ((c def c (c (? . 0) q ee-beginning-of-entry)) q (3213 . 5)) ((c def c (c (? . 1) q current-expeditor-grouper)) q (9787 . 4)) ((c def c (c (? . 0) q ee-open-line)) q (860 . 5)) ((c def c (c (? . 0) q ee-backward-char)) q (1657 . 5)) ((c def c (c (? . 0) q ee-forward-exp)) q (2211 . 5)) ((c def c (c (? . 1) q current-expeditor-color-enabled)) q (10035 . 4)) ((c def c (c (? . 1) q current-expeditor-post-skipper)) q (9178 . 4)) ((c def c (c (? . 0) q ee-history-bwd)) q (6188 . 5)) ((c def c (c (? . 0) q ee-insert-self/paren)) q (146 . 5)) ((c def c (c (? . 0) q ee-delete-line)) q (4482 . 5)) ((c def c (c (? . 0) q ee-id-completion/indent)) q (1182 . 5)) ((c def c (c (? . 0) q ee-previous-line)) q (1988 . 5)) ((c def c (c (? . 1) q current-expeditor-lexer)) q (9347 . 4)) ((c def c (c (? . 0) q ee-reset-entry)) q (5189 . 5)) ((c def c (c (? . 0) q ee-end-of-line)) q (3103 . 5)) ((c def c (c (? . 0) q ee-end-of-entry)) q (3330 . 5)) ((c def c (c (? . 0) q make-ee-insert-string)) q (372 . 6)) ((c def c (c (? . 0) q ee-upward-exp)) q (2544 . 5)) ((c def c (c (? . 0) q ee-flash-matching-delimiter)) q (3563 . 5)) ((c def c (c (? . 0) q ee-newline/accept)) q (512 . 5)) ((c def c (c (? . 1) q current-expeditor-history)) q (10164 . 4)) ((c def c (c (? . 0) q ee-history-bwd-contains)) q (6525 . 5)) ((c def c (c (? . 0) q current-ee-backward-history-point)) q (8029 . 5)) ((c def c (c (? . 0) q eestate?)) q (7107 . 3)) ((c def c (c (? . 0) q ee-newline)) q (754 . 5)) ((c def c (c (? . 0) q ee-eof)) q (5978 . 5)) ((c def c (c (? . 0) q ee-goto-matching-delimiter)) q (3441 . 5)) ((c def c (c (? . 0) q ee-history-bwd-prefix)) q (6408 . 5)) ((c def c (c (? . 0) q ee-forward-page)) q (2876 . 5)) ((c def c (c (? . 0) q ee-transpose-word)) q (3799 . 5)) ((c def c (c (? . 1) q call-with-expeditor)) q (8713 . 5)) ((c def c (c (? . 0) q ee-next-id-completion)) q (1540 . 5)) ((c def c (c (? . 1) q current-expeditor-parentheses)) q (9601 . 5)) ((c def c (c (? . 0) q ee-eof/delete-char)) q (5864 . 5)) ((c def c (c (? . 0) q ee-insert-self)) q (262 . 5)) ((c def c (c (? . 0) q ee-backward-page)) q (2764 . 5)) ((c def c (c (? . 0) q ee-suspend-process)) q (6993 . 5)) ((c def c (c (? . 1) q expeditor-read)) q (8593 . 4)) ((c def c (c (? . 0) q ee-reset-entry/break)) q (5073 . 5)) ((c def c (c (? . 0) q ee-yank-kill-buffer)) q (5749 . 5)) ((c def c (c (? . 0) q ee-indent-all)) q (1073 . 5)) ((c def c (c (? . 0) q ee-next-line)) q (1880 . 5)) ((c def c (c (? . 0) q ee-redisplay)) q (6080 . 5)) ((c def c (c (? . 0) q ee-delete-word)) q (5299 . 5)) ((c def c (c (? . 1) q current-expeditor-ready-checker)) q (9466 . 4)) ((c def c (c (? . 0) q ee-backward-delete-char)) q (4363 . 5)) ((c def c (c (? . 0) q entry?)) q (7161 . 3)) ((c def c (c (? . 1) q expeditor-configure)) q (8930 . 2)) ((c def c (c (? . 0) q ee-backward-exp)) q (2433 . 5)) ((c def c (c (? . 0) q ee-indent)) q (968 . 5)) ((c def c (c (? . 0) q ee-delete-entry)) q (4962 . 5)) ((c def c (c (? . 0) q ee-backward-word)) q (2321 . 5)) ((c def c (c (? . 0) q ee-accept)) q (637 . 5)) ((c def c (c (? . 0) q ee-history-fwd)) q (6298 . 5)) ((c def c (c (? . 0) q ee-id-completion)) q (1428 . 5)) ((c def c (c (? . 0) q ee-exchange-point-and-mark)) q (4131 . 5)) ((c def c (c (? . 1) q expeditor-close)) q (8519 . 3)) ((c def c (c (? . 0) q ee-downward-exp)) q (2653 . 5)) ((c def c (c (? . 0) q expeditor-set-syntax-color!)) q (7213 . 25)) ((c def c (c (? . 0) q ee-forward-char)) q (1769 . 5)) ((c def c (c (? . 0) q ee-delete-to-eol)) q (4592 . 5)) ((c def c (c (? . 0) q ee-delete-between-point-and-mark-or-backward)) q (4704 . 7)) ((c def c (c (? . 1) q current-expeditor-history-whitespace-trim-enabled)) q (10301 . 4)) ((c def c (c (? . 0) q ee-transpose-exp)) q (3912 . 5)) ((c def c (c (? . 0) q ee-beginning-of-line)) q (2987 . 5))))
procedure
(expeditor-bind-key! key handler) -> void?
  key : string?
  handler : (eestate? entry? char . -> . (or/c #f entry?))
procedure
(ee-insert-self/paren ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-insert-self ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
((make-ee-insert-string s) ee entry c) -> entry?
  s : string?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-newline/accept ee entry c) -> (or/c entry? #f)
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-accept ee entry c) -> (or/c #f entry?)
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-newline ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-open-line ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-indent ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-indent-all ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-id-completion/indent ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-id-completion/indent/reverse ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-id-completion ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-next-id-completion ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-backward-char ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-forward-char ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-next-line ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-previous-line ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-forward-word ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-forward-exp ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-backward-word ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-backward-exp ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-upward-exp ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-downward-exp ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-backward-page ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-forward-page ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-beginning-of-line ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-end-of-line ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-beginning-of-entry ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-end-of-entry ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-goto-matching-delimiter ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-flash-matching-delimiter ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-transpose-char ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-transpose-word ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-transpose-exp ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-set-mark ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-exchange-point-and-mark ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-delete-char ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-backward-delete-char ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-delete-line ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-delete-to-eol ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-delete-between-point-and-mark-or-backward ee        
                                              entry     
                                              c)    -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-delete-entry ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-reset-entry/break ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-reset-entry ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-delete-word ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-delete-exp ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-backward-delete-exp ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-yank-selection ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-yank-kill-buffer ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-eof/delete-char ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-eof ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-redisplay ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-history-bwd ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-history-fwd ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-history-bwd-prefix ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-history-bwd-contains ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-history-fwd-prefix ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-history-fwd-contains ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-command-repeat ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(ee-suspend-process ee entry c) -> entry?
  ee : eestate?
  entry : entry?
  c : char?
procedure
(eestate? v) -> boolean?
  v : any/c
procedure
(entry? v) -> boolean?
  v : any/c
procedure
(expeditor-set-syntax-color! category     
                             color)   -> void?
  category : (or/c 'error
                   'paren
                   'literal
                   'identifier
                   'comment)
  color : (or/c 'default
                'black
                'white
                'red
                'green
                'blue
                'yellow
                'cyan
                'magenta
                'dark-gray
                'light-gray
                'light-red
                'light-green
                'light-blue
                'light-yellow
                'light-cyan
                'light-magenta)
parameter
(current-ee-backward-history-point)
 -> (or/c 'start 'top 'bottom 'end)
(current-ee-backward-history-point start-at) -> void?
  start-at : (or/c 'start 'top 'bottom 'end)
parameter
(current-ee-forward-history-point)
 -> (or/c 'start 'top 'bottom 'end)
(current-ee-forward-history-point start-at) -> void?
  start-at : (or/c 'start 'top 'bottom 'end)
procedure
(expeditor-open history) -> (or/c eestate? #f)
  history : (listof string?)
procedure
(expeditor-close ee) -> (listof string?)
  ee : estate?
procedure
(expeditor-read ee [#:prompt prompt-str]) -> any/c
  ee : estate?
  prompt-str : string? = ">"
procedure
(call-with-expeditor  proc                      
                     [#:prompt prompt-str]) -> any
  proc : ((->* () (#:prompt string?) any/c) -> any)
  prompt-str : string? = ">"
procedure
(expeditor-configure) -> void?
procedure
(expeditor-init-file-path) -> path?
parameter
(current-expeditor-reader) -> (input-port? . -> . any/c)
(current-expeditor-reader proc) -> void?
  proc : (input-port? . -> . any/c)
parameter
(current-expeditor-post-skipper) -> (input-port? . -> . any/c)
(current-expeditor-post-skipper proc) -> void?
  proc : (input-port? . -> . any/c)
parameter
(current-expeditor-lexer) -> procedure?
(current-expeditor-lexer proc) -> void?
  proc : procedure?
parameter
(current-expeditor-ready-checker) -> procedure?
(current-expeditor-ready-checker proc) -> void?
  proc : procedure?
parameter
(current-expeditor-parentheses)
 -> (listof (list/c symbol? symbol?))
(current-expeditor-parentheses pairs) -> void?
  pairs : (listof (list/c symbol? symbol?))
parameter
(current-expeditor-grouper) -> procedure?
(current-expeditor-grouper proc) -> void?
  proc : procedure?
parameter
(current-expeditor-indenter) -> procedure?
(current-expeditor-indenter proc) -> void?
  proc : procedure?
parameter
(current-expeditor-color-enabled) -> boolean?
(current-expeditor-color-enabled on?) -> void?
  on? : boolean?
parameter
(current-expeditor-history) -> (listof string?)
(current-expeditor-history strs) -> void?
  strs : (listof string?)
parameter
(current-expeditor-history-whitespace-trim-enabled) -> boolean?
(current-expeditor-history-whitespace-trim-enabled on?) -> void?
  on? : any/c
procedure
(expeditor-error-display s) -> void?
  s : string?
