anchor.diff:      (&rest params)
       (:documentation "Also known as RPL_CURRENT_LOCAL"))
   
  -(define-event global-users-event :RPL_GLOBALUSERRS (event)
  +(define-event global-users-event :RPL_GLOBALUSERS (event)
       (&rest params)
       (:documentation "Also known as RPL_CURRENT_GLOBAL"))
   
  
positive.code:     (unless (char= (aref channel 0) #\#)
        (setf channel (nick event)))))
  
  (define-event join-event :JOIN (channel-event) ()
      (:documentation "User join event."))
  
  (define-event part-event :PART (channel-event) ()
      (:documentation "User part event."))
  
  (define-event quit-event :QUIT (user-event)
  
negative.code:     (:documentation "Reply to STATS (See RFC)"))
  
  (define-event stats-oline-event :RPL_STATSOLINE (event)
      (NIL hostmask NIL nick &optional message)
      (:documentation "Reply to STATS (See RFC); The info field is an extension found in some IRC daemons, which returns info such as an e-mail address or the name/job of an operator"))
  
  (define-event stats-hline-event :RPL_STATSHLINE (event)
  