Fix broken compilation of (setof ?x (or clause clause ..) ?answer).

quek / paiprolog

forked Christophe Rhodes's PAIProlog that an update of Peter Norvig's "Prolog in Common Lisp".

Other

18 stars 6 forks source link

Fix broken compilation of (setof ?x (or clause clause ..) ?answer). #17

Closed alanruttenberg closed 6 years ago

alanruttenberg commented 6 years ago

The compiler special cases '(or and if) but compile-clause wasn't handling it. Change is to call compile-body for that case. I'm not 100% confident this is the only place that needs to be fixed, or whether it is the best fix.

quek commented 6 years ago

Thanks