test/Tools/isac/Interpret/script.sml
branchdecompose-isar
changeset 41922 32d7766945fb
parent 38058 ad0485155c0e
child 41924 7407ceef2aed
     1.1 --- a/test/Tools/isac/Interpret/script.sml	Fri Mar 04 11:30:37 2011 +0100
     1.2 +++ b/test/Tools/isac/Interpret/script.sml	Fri Mar 04 11:43:45 2011 +0100
     1.3 @@ -177,7 +177,7 @@
     1.4  val (p,_,f,nxt,_,pt) = me nxt p c pt; f2str f(*------------------------*);
     1.5  trace_rewrite:=false;
     1.6  (*Exception TYPE raised:
     1.7 -Illegal type for constant "op =" :: "[real, bool] => bool"
     1.8 +Illegal type for constant "HOL.eq" :: "[real, bool] => bool"
     1.9  Atools.argument'_in (Tools.lhs (ListG.nth_ (1 + -1 + -1) [])) =
    1.10  ListG.nth_ (1 + -1 + -1) []
    1.11  Exception-
    1.12 @@ -185,7 +185,7 @@
    1.13        ("Illegal type for constant \"op =\" :: \"[real, bool] => bool\"",
    1.14           [],
    1.15           [Const ("Trueprop", "bool => prop") $
    1.16 -               (Const ("op =", "[RealDef.real, bool] => bool") $ ... $ ...)])
    1.17 +               (Const ("HOL.eq", "[RealDef.real, bool] => bool") $ ... $ ...)])
    1.18     raised
    1.19  ... this was because eval_argument_in took "argument_in (lhs (M_b 0 = 0))"
    1.20  ie. the argument had not been simplified before          ^^^^^^^^^^^^^^^