Merge branch 'mquat2'

src/main/jastadd/Analysis.jrag

@@ -170,7 +170,9 @@ aspect Constructors {
       list.addAll(getSuper().decl().componentsTransitive());
     }
     for (Component c: getComponents()) {
-      list.add(c);
+      if (c.inConstructor()) {
+        list.add(c);
+      }
     }
     return list;
   }
@@ -186,6 +188,12 @@ aspect Constructors {
       && getSuper().decl() != null
       && getSuper().decl().needsConstructor();
   }
+
+  /**
+   * @return true, if the component should be added to the constructor (i.e., is not an NTA)
+   */
+  syn boolean Component.inConstructor() = true;
+  eq NTAComponent.inConstructor() = false;
 }
 
 aspect Utils {

src/test/jastadd/relations/Relations.relast

 Root ::= A* B*;
-A ::= <Name>;
+A ::= <Name> /SomeNTA:A/;
 B ::= <Name>;
 
 rel A.Di1  -> B;