changeset 39507 | 839873937ddd |
parent 39288 | f1ae2493d93f |
child 39508 | dfacdb01e1ec |
--- a/src/Pure/Syntax/syntax.ML Fri Sep 17 17:31:20 2010 +0200 +++ b/src/Pure/Syntax/syntax.ML Fri Sep 17 20:18:27 2010 +0200 @@ -182,7 +182,7 @@ fun parse_token ctxt markup str = let val (syms, pos) = read_token str; - val _ = Context_Position.report ctxt markup pos; + val _ = Context_Position.report ctxt pos markup; in (syms, pos) end; local