X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=dev%2Fcopying.lisp;fp=dev%2Fcopying.lisp;h=edb5dbeb4244192eafb034e653f8844d4286e16b;hb=65b29b990908dd664a3326096cdc78cb36a07162;hp=0000000000000000000000000000000000000000;hpb=a196e72eb584440a594f0665ff5c97037ce4cf70;p=cl-graph.git

diff --git a/dev/copying.lisp b/dev/copying.lisp
new file mode 100644
index 0000000..edb5dbe
--- /dev/null
+++ b/dev/copying.lisp
@@ -0,0 +1,21 @@
+(in-package cl-graph)
+
+(metacopy:defcopy-methods basic-vertex 
+  :copy-all t)
+
+(metacopy:defcopy-methods basic-edge 
+  :set (edge-id tag color graph)
+  :copy (element))
+
+(metacopy:defcopy-methods weighted-edge-mixin 
+  :copy-all t)
+
+(metacopy:defcopy-methods basic-graph 
+  :copy-all t)
+
+(metacopy:defcopy-methods graph-container-vertex 
+  :copy-all t)
+
+(metacopy:defcopy-methods graph-container-edge 
+  :copy-all t)
+