Function: testcover--copy-object

testcover--copy-object is a byte-compiled function defined in testcover.el.gz.

Signature

(testcover--copy-object OBJ)

Documentation

Make a copy of OBJ.

If OBJ is a cons cell, copy both its car and its cdr. Contrast to copy-tree which does the same but fails on circular structures, and copy-sequence, which copies only along the cdrs. Copy vectors as well as conses.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/testcover.el.gz
(defun testcover--copy-object (obj)
  "Make a copy of OBJ.
If OBJ is a cons cell, copy both its car and its cdr.
Contrast to `copy-tree' which does the same but fails on circular
structures, and `copy-sequence', which copies only along the
cdrs.  Copy vectors as well as conses."
  (let ((ht (make-hash-table :test 'eq)))
    (testcover--copy-object1 obj t ht)))