src/Pure/Isar/args.ML
changeset 8896 c80aba8c1d5e
parent 8803 189203bb4b34
child 9126 ca8c6793dca5
equal deleted inserted replaced
8895:2913a54e64cf 8896:c80aba8c1d5e
   179 fun args blk x = Scan.optional (args1 blk) [] x
   179 fun args blk x = Scan.optional (args1 blk) [] x
   180 and args1 blk x =
   180 and args1 blk x =
   181   ((Scan.repeat1
   181   ((Scan.repeat1
   182     (Scan.repeat1 (atom_arg blk) ||
   182     (Scan.repeat1 (atom_arg blk) ||
   183       paren_args "(" ")" args ||
   183       paren_args "(" ")" args ||
   184       paren_args "{" "}" args ||
       
   185       paren_args "[" "]" args)) >> flat) x;
   184       paren_args "[" "]" args)) >> flat) x;
   186 
   185 
   187 
   186 
   188 
   187 
   189 (** type src **)
   188 (** type src **)