[Mobies-commit] [commit] r3752 - UDM/trunk/src/UdmCliGen

[ksmyth at redhat1.isis.vanderbilt.edu]

Author: ksmyth
Date: Tue May 17 13:06:15 2011
New Revision: 3752

Log:
Support setting ends of connections

Modified:
   UDM/trunk/src/UdmCliGen/Implementation.tmpl
   UDM/trunk/src/UdmCliGen/Interface.tmpl

Modified: UDM/trunk/src/UdmCliGen/Implementation.tmpl
==============================================================================
--- UDM/trunk/src/UdmCliGen/Implementation.tmpl	Mon May 16 14:38:58 2011	(r3751)
+++ UDM/trunk/src/UdmCliGen/Implementation.tmpl	Tue May 17 13:06:15 2011	(r3752)
@@ -265,6 +265,13 @@
                 }
                 return null;
             }
+            set
+            {
+                using (Udm.Native.Object_set set = new Udm.Native.Object_set()) {
+                    set.Add(((global::Udm.Native.UdmCliObject)value).backing);
+                    backing.setAssociation($meta_name, set, Udm.Native.Udm.TARGETFROMCLASS);
+                }
+            }
         }
 #end for
 #end if

Modified: UDM/trunk/src/UdmCliGen/Interface.tmpl
==============================================================================
--- UDM/trunk/src/UdmCliGen/Interface.tmpl	Mon May 16 14:38:58 2011	(r3751)
+++ UDM/trunk/src/UdmCliGen/Interface.tmpl	Tue May 17 13:06:15 2011	(r3752)
@@ -57,8 +57,7 @@
 // Association role
 #if $c.association
 #for $role in $c.association.children()
-## TODO: set
-        $fq_iname($role.target) @$role.name { get; }
+        $fq_iname($role.target) @$role.name { get; set; }
 #end for
 #end if
     }