Changes in src/Parser/TypeData.cc [4e06c1e:5d125e4]

File:

• src/Parser/TypeData.cc (modified) (4 diffs)

src/Parser/TypeData.cc

@@ -10 +10 @@
 // Created On       : Sat May 16 15:12:51 2015
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Tue Jul 12 17:21:49 2016
-// Update Count     : 50
+// Last Modified On : Wed Jul 13 18:03:29 2016
+// Update Count     : 56
 //
 
@@ -200 +200 @@
                 newtype->aggregate->name = aggregate->name;
                 newtype->aggregate->kind = aggregate->kind;
+                newtype->aggregate->body = aggregate->body;
                 break;
           case AggregateInst:
@@ -327 +328 @@
                         os << string( indent + 2, ' ' ) << "with members " << endl;
                         aggregate->fields->printList( os, indent + 4 );
-///     } else {
-///       os << string( indent + 2, ' ' ) << "with no members " << endl;
+                } // if
+                if ( aggregate->body ) {
+                        os << string( indent + 2, ' ' ) << " with body " << endl;
                 } // if
                 break;
@@ -847 +849 @@
 
         buildList( aggregate->fields, at->get_members() );
+        at->set_body( aggregate->body );
 
         return at;