;;; Guix shell manifest ;;; SPDX-FileCopyrightText: 2025 Nguyễn Gia Phong ;;; SPDX-License-Identifier: GPL-3.0-or-later (use-modules (ice-9 textual-ports)) (define (read-file path) (call-with-input-file path (lambda (port) (get-string-all port)))) (define (read-lines path) (filter (compose not string-null?) (string-split (read-file path) #\newline))) (define (_->- char) (if (eqv? char #\_) #\- char)) (let ((tree-sitter-grammars (map (lambda (language) (string-append "tree-sitter-" (string-map _->- language))) (read-lines "src/supported-languages")))) (specifications->manifest (cons* "zig" "janet" tree-sitter-grammars)))