anchor.diff:  	   (string= "bert" (symbol-name first-element))))))
   
   
  -(defgeneric translate-complex-type (object)
  -  (:documentation "Translates tuples with the 'bert' tag to corresponding Lisp objects and vice versa."))
  -
  -
   (defun decode (bytes)
     (cleric:decode bytes :version-tag t))
   
  
positive.code:     (encode (tuple '|bert| '|regex| (string-to-binary source) options))))
  
  
  (deftype bert-translatable ()
    "A type that encompasses all types of Lisp objects that can be translated to BERT objects."
    '(satisfies bert-translatable-p))
  
negative.code: ;;
  
  (in-package :bert)
  
  
  (defgeneric translate-complex-type (object)
    (:documentation "Translates tuples with the 'bert' tag to corresponding Lisp objects and vice versa."))
  
  
  (defclass bert-time ()
  