try to put tokens where they can be picked up

mbdevpl · Dec 9, 2017 · 9b6ae48 · 9b6ae48
1 parent 9d3f22c
commit 9b6ae48
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/src/fortran/ofp/XMLPrinterBase.java b/src/fortran/ofp/XMLPrinterBase.java
@@ -589,6 +589,13 @@ protected void insertTokens(Element context, int tokenType, String tokenContextN
 				throw new IllegalArgumentException("two possible targets");
 			}
 			*/
+			if (targetIndex > 0) {
+				Element beforeTarget = contextNode(target, targetIndex - 1);
+				if (beforeTarget.getNodeName().equals("body")) {
+					target = beforeTarget;
+					targetIndex = contextNodesCount(beforeTarget);
+				}
+			}
 
 			Element tokenNode = contextOpen(tokenContextName);
 			setAttribute(tokenTextAttributeName, token.getText());