src/Tools/isac/Interpret/inform.sml
changeset 42432 7dc25d1526a5
parent 42431 22f0435fdfe2
child 42433 ed0ff27b6165
     1.1 --- a/src/Tools/isac/Interpret/inform.sml	Tue May 22 07:00:53 2012 +0200
     1.2 +++ b/src/Tools/isac/Interpret/inform.sml	Tue May 22 13:40:06 2012 +0200
     1.3 @@ -720,7 +720,7 @@
     1.4        rew_sub (Isac()) 1 subst e_rew_ord e_rls false [] (Trueprop $ pat) form;
     1.5    in (*the fillpat of the thm must be dedicated to errpatID*)
     1.6      if errpatID = erpaID andalso rewritten
     1.7 -    then SOME (fillpatID, term2str (HOLogic.mk_eq (form, form'))) else NONE end;
     1.8 +    then SOME (fillpatID, HOLogic.mk_eq (form, form')) else NONE end;
     1.9  
    1.10  fun get_fillpats subst form errpatID thm =
    1.11        let