src/Pure/Tools/find_consts.ML
changeset 62969 9f394a16c557
parent 62848 e4140efe699e
child 63429 baedd4724f08
equal deleted inserted replaced
62968:4e4738698db4 62969:9f394a16c557
   134 (* command syntax *)
   134 (* command syntax *)
   135 
   135 
   136 local
   136 local
   137 
   137 
   138 val criterion =
   138 val criterion =
   139   Parse.reserved "name" |-- Parse.!!! (Parse.$$$ ":" |-- Parse.xname) >> Name ||
   139   Parse.reserved "name" |-- Parse.!!! (Parse.$$$ ":" |-- Parse.name) >> Name ||
   140   Parse.reserved "strict" |-- Parse.!!! (Parse.$$$ ":" |-- Parse.typ) >> Strict ||
   140   Parse.reserved "strict" |-- Parse.!!! (Parse.$$$ ":" |-- Parse.typ) >> Strict ||
   141   Parse.typ >> Loose;
   141   Parse.typ >> Loose;
   142 
   142 
   143 val query_keywords = Keyword.add_keywords [((":", @{here}), NONE)] Keyword.empty_keywords;
   143 val query_keywords = Keyword.add_keywords [((":", @{here}), NONE)] Keyword.empty_keywords;
   144 
   144