1.1 --- a/src/Tools/isac/Interpret/solve-step.sml	Sun Apr 18 22:27:43 2021 +0200
     1.2 +++ b/src/Tools/isac/Interpret/solve-step.sml	Sun Apr 18 23:37:59 2021 +0200
     1.3 @@ -20,12 +20,9 @@
     1.4      string * ThyC.id * Rule_Def.rew_ord' * Rule_Def.rule_set * bool
     1.5    val get_eval: string -> Pos.pos ->Ctree.ctree ->
     1.6      string * ThyC.id * (string * Rule_Def.eval_fn)
     1.7 -
     1.8 -(* ---- for tests only: shifted from below to remove the Warning "unused" at fun.def. --------- *)
     1.9 -  (*NONE*)                                                     
    1.10 -(*/-------------------------------------------------------- ! aktivate for Test_Isac BEGIN ---\* )
    1.11 +\<^isac_test>\<open>
    1.12    val rew_info: Rule_Def.rule_set -> string * Rule_Def.rule_set * Rule_Def.calc list
    1.13 -( *\--- ! aktivate for Test_Isac END ----------------------------------------------------------/*)
    1.14 +\<close>
    1.15  end
    1.16  
    1.17  (**)