Изучаю лисп по книге practical common lisp. Проблема в том, что компилятор (SLIME->Compilation->Compile/Load File) ругаеся на следующий код:
(defvar db nil)
(defun add-record (cd)
(push cd db)
)
(defun make-cd (title artist rating ripped)
(list :title title :artist artist :rating rating :ripped ripped)
)
(defun dump-db ()
(dolist (cd db)
(format t "~{~a:~10t~a~%~}~%" cd))
)
(defun promt-for-cd()
(make-cd
(promt-read "Title")
(promt-read "Artist")
(or (parse-integer (promt-read "Rating") :junk-allowed t) 0)
(y-or-n-p(promt-read "Ripped [y/n]"))
)
)
-+ Errors (1)
`-- SB-INT:SIMPLE-READER-ERROR at 13 (line 1, column 13) on #<SB-SYS:FD-STREAM for "file /home/nikitad/LISP/01.lisp" {10036D6AC1}>:
illegal terminating character after a colon: #\
nikitad@desktop001 ~ $ qlist -Iv emacs lisp
app-admin/emacs-updater-1.3
app-admin/eselect-emacs-1.8
app-editors/emacs-22.3-r1
app-emacs/autoconf-mode-2.63
app-emacs/color-browser-0.3-r1
app-emacs/color-theme-6.6.0
app-emacs/mmm-mode-0.4.8-r1
app-emacs/po-mode-0.17
app-emacs/quack-0.30
app-emacs/ruby-mode-1.9.1_pre1
app-emacs/scheme-complete-0.8.1
app-emacs/slime-2.0_p20080731
dev-lisp/cl-asdf-1.89
dev-lisp/cl-asdf-binary-locations-20061018
dev-lisp/common-lisp-controller-5.13-r1
dev-lisp/gentoo-init-0.1
dev-lisp/sbcl-1.0.19
virtual/emacs-22
x11-misc/emacs-desktop-0.3
nikitad@desktop001 ~ $ uname -a
Linux desktop001 2.6.28-gentoo-r1 #1 SMP PREEMPT Sat Jan 31 02:24:37 MSK 2009 x86_64 Intel(R) Core(TM)2 Quad CPU Q9400 @ 2.66GHz GenuineIntel GNU/Linux