changeset 39: | 1ef551e24009 |
parent: | 77da08c7f445 |
author: | Richard Westhaver <ellis@rwest.io> |
date: | Thu, 11 Apr 2024 18:58:35 -0400 |
permissions: | -rw-r--r-- |
description: | added musicbrainz db example |
26 | 1 | (in-package :cl-user) |
2 | ||
39
1ef551e24009
added musicbrainz db example
Richard Westhaver <ellis@rwest.io>
parents:
31
diff
changeset
|
3 | (require :sb-introspect) |
1ef551e24009
added musicbrainz db example
Richard Westhaver <ellis@rwest.io>
parents:
31
diff
changeset
|
4 | (require :asdf) |
1ef551e24009
added musicbrainz db example
Richard Westhaver <ellis@rwest.io>
parents:
31
diff
changeset
|
5 | (require :sb-sprof) |
1ef551e24009
added musicbrainz db example
Richard Westhaver <ellis@rwest.io>
parents:
31
diff
changeset
|
6 | (require :sb-rotate-byte) |
1ef551e24009
added musicbrainz db example
Richard Westhaver <ellis@rwest.io>
parents:
31
diff
changeset
|
7 | (require :sb-cltl2) |
1ef551e24009
added musicbrainz db example
Richard Westhaver <ellis@rwest.io>
parents:
31
diff
changeset
|
8 | (asdf:register-preloaded-system :sb-rotate-byte) |
1ef551e24009
added musicbrainz db example
Richard Westhaver <ellis@rwest.io>
parents:
31
diff
changeset
|
9 | (asdf:register-preloaded-system :sb-cltl2) |
1ef551e24009
added musicbrainz db example
Richard Westhaver <ellis@rwest.io>
parents:
31
diff
changeset
|
10 | (asdf:register-preloaded-system :std) |
1ef551e24009
added musicbrainz db example
Richard Westhaver <ellis@rwest.io>
parents:
31
diff
changeset
|
11 | (asdf:register-preloaded-system :log) |
26 | 12 | |
13 | (ql:update-all-dists :prompt nil) |
|
14 | ||
15 | (pushnew :demo *features*) |
|
16 | ||
39
1ef551e24009
added musicbrainz db example
Richard Westhaver <ellis@rwest.io>
parents:
31
diff
changeset
|
17 | (ql:quickload :prelude) |
1ef551e24009
added musicbrainz db example
Richard Westhaver <ellis@rwest.io>
parents:
31
diff
changeset
|
18 | (ql:register-local-projects) |
1ef551e24009
added musicbrainz db example
Richard Westhaver <ellis@rwest.io>
parents:
31
diff
changeset
|
19 | (log:info! "*local-project-directories:" ql:*local-project-directories*) |
26 | 20 |