guix/guix
3
5
Fork 0
mirror of git://git.savannah.gnu.org/guix.git synced 2023-12-14 03:33:07 +01:00
Code Issues Releases Wiki Activity

gnu: Add guile-raw-strings.

Browse source 
* gnu/packages/guile-xyz.scm (guile-raw-strings): New variable.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Xinglu Chen 2021-05-09 10:18:12 +02:00 committed by Ludovic Courtès
parent 559d42d652
commit 909caad6be
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 32 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

32
gnu/packages/guile-xyz.scm
View file

@ -2127,6 +2127,38 @@ microAdapton. Both miniAdapton and microAdapton are designed to be easy to
understand, extend, and port to host languages other than Scheme.")
(license license:expat))))
(define-public guile-raw-strings
(let ((commit "aa1cf783f2542811b473f797e12490920b779baa")
(revision "0"))
(package
(name "guile-raw-strings")
(version (git-version "0.0.0" revision commit))
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/lloda/guile-raw-strings")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32
"1r2gx86zw5hb6byllra3nap3fw9p7q7rvdmg6qn9myrdxyjpns3l"))))
(build-system guile-build-system)
(arguments
`(#:phases
(modify-phases %standard-phases
(add-after 'build 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(invoke "guile" "-L" "." "-s" "test.scm")))))))
(native-inputs
`(("guile" ,guile-3.0)))
(home-page "https://github.com/lloda/guile-raw-strings")
(synopsis "Guile reader extension for `raw strings'")
(description "This package provides A Guile reader extension for `raw
strings', it lets you write verbatim strings without having to escape double
quotes. ")
(license license:public-domain))))
(define-public guile-reader
(package
(name "guile-reader")