1.1 --- a/src/Tools/isac/Interpret/lucas-interpreter.sml Tue Apr 21 12:26:08 2020 +0200
1.2 +++ b/src/Tools/isac/Interpret/lucas-interpreter.sml Tue Apr 21 15:42:50 2020 +0200
1.3 @@ -588,7 +588,7 @@
1.4 end
1.5 (*find_next_step from program, by_tactic will update Ctree*)
1.6 and do_next (ptp as (pt, pos as (p, p_))) =
1.7 - if Celem.e_metID = get_obj g_metID pt (par_pblobj pt p) then
1.8 + if Spec.e_metID = get_obj g_metID pt (par_pblobj pt p) then
1.9 ("helpless", ([], [], (pt, (p, p_))))
1.10 else
1.11 let