8 lines
171 B
Common Lisp
8 lines
171 B
Common Lisp
|
(load "~/.sbclrc")
|
||
|
|
(ql:quickload :loop :silent t)
|
||
|
|
(in-package #:loop)
|
||
|
|
(connect-index! "message-id.db")
|
||
|
|
(remake-index!)
|
||
|
|
(index-from-fs!)
|
||
|
|
(format t "Index built.~%")
|