(use-modules (guix packages) (guix build-system) (gnu packages)) (define (tree-sitter-grammar? package) (and (eq? 'tree-sitter (build-system-name (package-build-system package))) (not (package-superseded package)))) (packages->manifest (fold-packages (lambda (package result) (if (tree-sitter-grammar? package) (cons package result) result)) '()))