proper norm_props, e.g. relevant for ML pp;
--- a/src/Pure/General/position.ML Tue Mar 29 16:20:48 2016 +0200
+++ b/src/Pure/General/position.ML Tue Mar 29 20:52:19 2016 +0200
@@ -135,7 +135,7 @@
fun id_only id = Pos ((0, 0, 0), [(Markup.idN, id)]);
fun get_id (Pos (_, props)) = Properties.get props Markup.idN;
-fun put_id id (Pos (count, props)) = Pos (count, Properties.put (Markup.idN, id) props);
+fun put_id id (Pos (count, props)) = Pos (count, norm_props (Properties.put (Markup.idN, id) props));
fun parse_id pos = Option.map Markup.parse_int (get_id pos);