anchor.diff:  
      ;;; clock.lisp
   
  -   #:*clock*
      #:*performance-mode*
      #:*performance-errors*
   
  
positive.code:    ;;; event.lisp
  
     #:event
     #:*event*
     #:combine-events
     #:split-event-by-lists
     #:event-plist
  
negative.code: (defpackage #:cl-patterns
    (:use #:cl)
    (:export
  
     ;;; utility.lisp
  
     #:*event*
     #:*clock*
     #:gete
     #:keys
  
  