Generate @see javadoc links.

juliac/extension/adlet/adl/src/main/java/org/objectweb/fractal/juliac/adlet/StaticMetamodelProcessor.java

@@ -330,6 +330,7 @@ public class StaticMetamodelProcessor extends AbstractProcessor {
                 expression.append(name);
                 expression.append("\")");
                 
+                cv.visitComment("/** @see "+element.toString()+'#'+field.getSimpleName()+" */");
                 cv.visitField(
                     modifiers, type.toString(), (String)name,
                     expression.toString() );
@@ -337,7 +338,7 @@ public class StaticMetamodelProcessor extends AbstractProcessor {
         }
 
         /*
-         * Generate fields for subcomponents.
+         * Generate classes for subcomponents.
          * @Component annotated fields.
          */
         for (VariableElement field : fields) {
@@ -351,6 +352,7 @@ public class StaticMetamodelProcessor extends AbstractProcessor {
                     field.getSimpleName().toString() :
                     sub.name();
                 ClassSourceCodeVisitor innercv = cv.visitInnerClass();
+                innercv.visitComment("/** @see "+element.toString()+'#'+field.getSimpleName()+" */");
                 innercv.visit(modifiers,name,null,null,null);
                 process(te,innercv,className+'.'+name,className);
                 innercv.visitEnd();
@@ -358,7 +360,7 @@ public class StaticMetamodelProcessor extends AbstractProcessor {
         }
 
         /*
-         * Generate fields for subcomponents.
+         * Generate classes for subcomponents.
          * @Component annotated inner classes.
          */
         List<TypeElement> inners = ElementFilter.typesIn(members);
@@ -371,6 +373,7 @@ public class StaticMetamodelProcessor extends AbstractProcessor {
                     inner.getSimpleName().toString() :
                     sub.name();
                 ClassSourceCodeVisitor innercv = cv.visitInnerClass();
+                innercv.visitComment("/** @see "+inner.toString()+" */");
                 innercv.visit(modifiers,name,null,null,null);
                 process(inner,innercv,className+'.'+name,className);
                 innercv.visitEnd();