anchor.diff:      (if args
           (make-vobj (find-cls :object) (car args))
           this)
  -    (:prototype :object))
  +    (:prototype :object)
  +    (:slot-default :noenum))
   
     (.prototype :object
       (:parent nil)
  +    (:slot-default :nodel)
       (.func "toString" () (if (obj-p this) "[object Object]" (to-string this)))
       (.func "toLocaleString" () (js-method this "toString"))
       (.func "valueOf" () this)
  
positive.code:               (init-reobj this pattern flags)))
        (:prototype :regexp)
        (:make-new #'make-reobj)
        (:properties
         (.value "length" 2))) ;; Because the standard says so
  
      (.prototype :regexp
        (.func "toString" ()
          (if (reobj-p this)
              (multiple-value-bind (source flags) (regexp-args this)
  
negative.code:     (:make-new #'make-vobj))
  
    (.prototype :boolean
      (:slot-default :nodel)
      (.func "toString" () (if (typed-value-of this 'boolean) "true" "false"))
      (.func "valueOf" () (typed-value-of this 'boolean))))
  
  