;;; cl-scopes/storage/tracking.lisp ;;;; A simple generic (SQL-based) storage for tracks, messages, and other stuff. (in-package :scopes/storage) (defclass track () ( (head) (time-stamp :reader time-stamp :accessor time-stamp!) (data :accessor data) (container :initarg :container :initform nil)))