cons 1.2.0 → 1.2.1

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: a26a2155d3d263ecd52bb230db131f9619a1e5a4
-  data.tar.gz: 11378411b0f10c870551495f2624409fbbf8720b
+  metadata.gz: 991e2750c6a71c9463006e5a71066687ecdb9b47
+  data.tar.gz: d38f6398455cdcfccf8f5224dea54399523c6394
 SHA512:
-  metadata.gz: d1154b04fe6aebcdd1c122c66702e358e172528b307e134716695bbe9e7a596f1dd19a91637efd3b294475e629b64d8a0566512696cbf7e125a3579ee0c09a01
-  data.tar.gz: 821a3ae01029c14e04f0c258a3e7343e67a24e7abc1d37db909a6f71a6dec77c8c3ebc5fc7711087a01c252ad011ade31ef5dc43d4e0e30e5bdf2d99454ed8bb
+  metadata.gz: 8d2cf5e7df474aeed2e20a956bc5c82964ae4993561bc6777e623d448505b26e3f61b57c720348457960b322b2018c55fa5632b592485d3511fbb6941e64b18d
+  data.tar.gz: b2ce3dcd7a1491561782408faea3c40ce13bd7dd1846a39df60ccf5642a81618fe903f84395f16bd654f2d648889880d940ddc6fdafc67b56b91381ffe0854db

data/lib/cons.rb

@@ -194,6 +194,31 @@ class Cons
     end
   end
 
+  # Returns a copy of list. If list is a dotted list, the resulting list will
+  # also be a dotted list.
+  #
+  # Cf. <http://clhs.lisp.se/Body/f_cp_lis.htm>
+  def copy_list
+    new_cdr = if cdr.kind_of? Cons
+                cdr.copy_list
+              else
+                cdr
+              end
+    Cons[@car,new_cdr]
+  end
+
+  alias list_copy copy_list
+
+  # Creates a copy of a tree of conses.
+  #
+  # If tree is not a cons, it is returned; otherwise, the result is a new cons
+  # of the results of calling copy-tree on the car and cdr of tree. In other
+  # words, all conses in the tree represented by tree are copied recursively,
+  # stopping only when non-conses are encountered.
+  #
+  # copy-tree does not preserve circularities and the sharing of substructure.
+  #
+  # Cf. <http://clhs.lisp.se/Body/f_cp_tre.htm>
   def copy_tree
     new_car = if car.kind_of? Cons
                 car.copy_tree
@@ -282,8 +307,6 @@ class Cons
   ## Lots of TODOs from the CLHS
 
   # TODO - (n)butlast - http://clhs.lisp.se/Body/f_butlas.htm
-  # TODO - copy-alist - http://clhs.lisp.se/Body/f_cp_ali.htm
-  # TODO - copy-list - http://clhs.lisp.se/Body/f_cp_lis.htm
   # TODO - endp - http://clhs.lisp.se/Body/f_endp.htm
   # TODO - ldiff, tailp - http://clhs.lisp.se/Body/f_ldiffc.htm
   # TODO - list* - http://clhs.lisp.se/Body/f_list_.htm
@@ -296,6 +319,7 @@ class Cons
   # TODO - (n)sublis - http://clhs.lisp.se/Body/f_sublis.htm
 
   ## Alist stuff
+  # TODO - copy-alist - http://clhs.lisp.se/Body/f_cp_ali.htm
   # TODO - acons - http://clhs.lisp.se/Body/f_acons.htm
   # TODO - assoc, assoc-if, assoc-if-not - http://clhs.lisp.se/Body/f_assocc.htm
   # TODO - pairlis - http://clhs.lisp.se/Body/f_pairli.htm

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: cons
 version: !ruby/object:Gem::Version
-  version: 1.2.0
+  version: 1.2.1
 platform: ruby
 authors:
 - Christopher Mark Gore