It's a giant pain in the ass to write (query-map t (lambda (r) (getf r '?what)) (foo ?what)). PAIProlog has a handy syntax that makes this nicer: (query-for t ?what (foo ?what)). We should steal this syntax.
Potentially this could be more efficient by not consing up the full list of results, but for now I'll just take the less shitty syntax and we can make it faster later.
It's a giant pain in the ass to write
(query-map t (lambda (r) (getf r '?what)) (foo ?what))
. PAIProlog has a handy syntax that makes this nicer:(query-for t ?what (foo ?what))
. We should steal this syntax.Potentially this could be more efficient by not consing up the full list of results, but for now I'll just take the less shitty syntax and we can make it faster later.