--- a/src/Pure/ML/ml_antiquotations1.ML Tue Sep 28 22:50:22 2021 +0200
+++ b/src/Pure/ML/ml_antiquotations1.ML Tue Sep 28 23:25:13 2021 +0200
@@ -262,7 +262,7 @@
val ml = ML_Lex.tokenize_no_range;
val ml_range = ML_Lex.tokenize_range;
val ml_dummy = ml "_";
-fun ml_enclose range x = ml_range range "(" @ x @ ml_range range ")";
+fun ml_enclose range x = ml "(" @ x @ ml_range range ")";
fun ml_parens x = ml "(" @ x @ ml ")";
fun ml_bracks x = ml "[" @ x @ ml "]";
fun ml_commas xs = flat (separate (ml ", ") xs);