src/Pure/Isar/attrib.ML
changeset 31365 7f65653e3d48
parent 31358 3e640334a1b3
parent 31323 89f218fcab2a
child 31794 71af1fd6a5e4
     1.1 --- a/src/Pure/Isar/attrib.ML	Tue Jun 02 14:00:24 2009 +0200
     1.2 +++ b/src/Pure/Isar/attrib.ML	Tue Jun 02 14:38:10 2009 +0200
     1.3 @@ -240,8 +240,7 @@
     1.4  
     1.5  (* rename_abs *)
     1.6  
     1.7 -val rename_abs : (Context.generic * thm -> Context.generic * thm) parser =
     1.8 -  Scan.repeat (Args.maybe Args.name) >> (apsnd o Drule.rename_bvars');
     1.9 +fun rename_abs x = (Scan.repeat (Args.maybe Args.name) >> (apsnd o Drule.rename_bvars')) x;
    1.10  
    1.11  
    1.12  (* unfold / fold definitions *)