src/Pure/Thy/thy_output.ML
changeset 46958 0ec8f04e753a
parent 46957 0c15caf47040
child 47005 421760a1efe7
equal deleted inserted replaced
46957:0c15caf47040 46958:0ec8f04e753a
   624 end;
   624 end;
   625 
   625 
   626 
   626 
   627 (* embedded lemma *)
   627 (* embedded lemma *)
   628 
   628 
   629 val _ = Keyword.declare "by" NONE;  (*overlap with command category*)
   629 val _ = Keyword.define ("by", NONE);  (*overlap with command category*)
   630 
   630 
   631 val _ =
   631 val _ =
   632   Context.>> (Context.map_theory
   632   Context.>> (Context.map_theory
   633    (antiquotation (Binding.name "lemma")
   633    (antiquotation (Binding.name "lemma")
   634     (Args.prop -- Scan.lift (Args.$$$ "by" |-- Method.parse -- Scan.option Method.parse))
   634     (Args.prop -- Scan.lift (Args.$$$ "by" |-- Method.parse -- Scan.option Method.parse))