src/Pure/Isar/token.ML
changeset 48911 5debc3e4fa81
parent 48905 04576657cf94
child 48992 0518bf89c777
equal deleted inserted replaced
48910:1c8c15c30356 48911:5debc3e4fa81
   120   | Space => "white space"
   120   | Space => "white space"
   121   | Comment => "comment text"
   121   | Comment => "comment text"
   122   | InternalValue => "internal value"
   122   | InternalValue => "internal value"
   123   | Error _ => "bad input"
   123   | Error _ => "bad input"
   124   | Sync => "sync marker"
   124   | Sync => "sync marker"
   125   | EOF => "end-of-file";
   125   | EOF => "end-of-input";
   126 
   126 
   127 
   127 
   128 (* position *)
   128 (* position *)
   129 
   129 
   130 fun position_of (Token ((_, (pos, _)), _, _)) = pos;
   130 fun position_of (Token ((_, (pos, _)), _, _)) = pos;