Skip to content

Commit 06c8c13

Browse files
committed
remove singleton warning on building
1 parent 27dd9d5 commit 06c8c13

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

prolog/metta_lang/metta_eval.pl

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -948,7 +948,7 @@
948948
eval_20(Eq,RetType,Depth,Self,['call-unit!'|Program],Res):- !,
949949
eval_args(Eq,RetType,Depth,Self,['call-for!',[]|Program],Res).
950950

951-
eval_20(Eq,RetType,Depth,Self,['call-for!',Res|Program],Res):- !,
951+
eval_20(_Eq,_RetType,Depth,Self,['call-for!',Res|Program],Res):- !,
952952
must((s2ps(Depth,Self,Program,ProgramL),
953953
maplist(call_prog,ProgramL))).
954954

0 commit comments

Comments
 (0)