Patched import problem for inline procedures with flags

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@6886 8c9fc860-2736-0410-a75d-ab315db34111

source/FoxPrintout.Mod

@@ -1243,9 +1243,6 @@ TYPE
 				(*
 				flags := type.flags;
 				*)
-				IF x.isInline THEN w.String(" - ") END;
-				IF x.isConstructor THEN w.String(" & ") END;
-				IF x.isFinalizer THEN w.String(" ~ ") END;
 
 				first := TRUE;
 				IF type.stackAlignment > 1 THEN Value(Global.NameStackAligned,type.stackAlignment,first) END;
@@ -1256,6 +1253,10 @@ TYPE
 				END;
 				FlagEnd(first);
 
+				IF x.isInline THEN w.String(" - ") END;
+				IF x.isConstructor THEN w.String(" & ") END;
+				IF x.isFinalizer THEN w.String(" ~ ") END;
+
 				IF info THEN
 					BeginComment;
 					Modifiers(x.type(SyntaxTree.ProcedureType).modifiers);