2
(cl-interpol:enable-interpol-syntax)
4
(defvar *quote* #\" "Default quote character")
5
(defvar *separator* #\, "Default separator character")
7
;; we want to read basically anything by default
8
(defvar *read-newline* #?"\n"
9
"Default newline string for reading.
10
We trim extra whitespace by default *trim-outer-whitespace*")
12
;; we want to write toward excel by default
13
(defvar *write-newline* #?"\r\n"
14
"When writing what should the newline convention be ")
16
(defvar *always-quote* nil "Default setting for always quoting")
17
(defvar *quote-escape* #?"${ *quote* }${ *quote* }" "Default setting for escaping quotes")
18
(defvar *unquoted-empty-string-is-nil* nil
19
"Should unquoted empty string values, be nil or \"\".")
21
(defvar *quoted-empty-string-is-nil* nil
22
"Should empty string values, be nil or \"\".
23
Unquoted values are always trimmed of surrounding whitespace.
24
Quoted values are never be trimmed")
26
(defvar *trim-outer-whitespace* t
27
"Should white space between delimiters and data or quotes be removed
29
These underscores (if they were spaces) are the locations in question
32
(defvar *enable-signals* nil
33
"Should the reading and writing process enable filtering signals")
35
(defvar *eof-char* #\null "The char we use for eof")
37
(defvar *buffer-size* 512)
b'\\ No newline at end of file'