anchor.diff:                      new-value (find-entity-by-uid new-value)))
               (t
                (add-modifier entity "entity" "uid" new-value
  -                           :description "Unique human-usable identifier for entity."))))))
  +                           :description "Unique external identifier for entity."))))))
   
   (defun find-entity-by-uid (uid)
     (with-db ()
  
positive.code:     (maphash-values #'funcall callbacks)))
  
  (defparameter *ticks-per-second* 5)
  (defvar *es-thread* nil)
  (defun init-entity-system ()
    (setf *es-thread*
          (bt:make-thread (lambda ()
                            (loop with timer = (make-timer *ticks-per-second*)
                               do (timer-tick timer)
  
negative.code:    (ns :col-type text :initarg :ns)
     (name :col-type text :initarg :name)
     (description :col-type (or db-null text) :initarg :description)
     ;; NOTE: If another value type is added here, ADD-MODIFIER and MODIFIER-VALUE must be amended.
     (numeric-value :col-type (or db-null numeric) :initarg :numeric-value)
     (text-value :col-type (or db-null text) :initarg :text-value))
    (:keys id))
  