clear ; mettalog --process=show_precompiled_types tests/QC-precommit/GreedyChessPlaysSelfAFewMoves.metta --repl

Author: TeamSPoon

prolog/metta_lang/metta_compiler.pl

@@ -3742,9 +3742,9 @@
   %extract_constraints(Out,VS),
   renumvars(Out+VS,COut+CVS),
   %CVS = VS, COut = Out,
-  in_color((
+  in_cmt(in_color((
     pp_se(COut),
-    maplist(ppt_cns,CVS))))).
+    maplist(ppt_cns,CVS)))))).
 
 ppt_cns(put_attr(Var,cns,_=List)):- ppt(Var=List),!.
 ppt_cns(_).