blob: e39196ecd70ceeb8a7c8799caf447a2b22c6cb02 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
;;; 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)))
(let ((tree-sitter-grammars (map (lambda (language)
(string-append "tree-sitter-" language))
(read-lines "src/supported-languages"))))
(specifications->manifest (cons "zig" tree-sitter-grammars)))
|