mcclim/luvcraft-metabar-tests.lisp
in-package#:mcluv.surveyor-tests
deftestluvcraft-metabar-adapts-the-existing-knob-and-action-objects
let*
session
allocate-instance
find-class'luvcraft:luvcraft-session
okknob
ok
ok
eq:scalar
ok
ok
okaction
ok
ok
defclass knob
One live value: where it lives, what it measures, and -- by its class -- what SESSION must do after a change for the change to show.
defvar *knobs*
Every defined knob, in definition order.
define-arithmetic-operator and
Logical conjunction of tests and raw truth values.
defclass action
One named verb over a session.
defvar *actions*
Every defined action, in definition order.
defgeneric metabar-control-value
(control owner)Return CONTROL's cheap authored value. This runs during owner refresh, never inside repaint.