LINUX.ORG.RU

История изменений

Исправление ados, (текущая версия) :

замечания бывалых лисперов по приведённому коду.

`(remove-if-not (lambda (,rec) ,(query-helper query))
                ,records))))

лучше читается, чем:

`(remove-if-not (lambda (,rec) ,(query-helper query)) ,records))))

Ещё бы я в таком коде использовал бы вместо car и cdr их алиазы first и rest.

Исходная версия ados, :

замечания бывалых лисперов по приведённому коду.

`(remove-if-not (lambda (,rec) ,(query-helper query))
                ,records))))

лучше читается, чем:

`(remove-if-not (lambda (,rec) ,(query-helper query)) ,records))))