gnu: llvm: Remove unused 'package-elisp-from-package' procedure.
This private procedure had been unused since
3a3d4d9d54
.
* gnu/packages/llvm.scm (package-elisp-from-package): Remove.
This commit is contained in:
parent
c7d2dd6900
commit
ef1d475b00
@ -866,35 +866,6 @@ with that of libgomp, the GNU Offloading and Multi Processing Library.")
|
|||||||
"This package provides a Python binding to LLVM for use in Numba.")
|
"This package provides a Python binding to LLVM for use in Numba.")
|
||||||
(license license:bsd-3)))
|
(license license:bsd-3)))
|
||||||
|
|
||||||
(define (package-elisp-from-package source-package package-name
|
|
||||||
source-files)
|
|
||||||
"Return a package definition named PACKAGE-NAME that packages the Emacs Lisp
|
|
||||||
SOURCE-FILES found in SOURCE-PACKAGE."
|
|
||||||
(let ((orig (package-source source-package)))
|
|
||||||
(package
|
|
||||||
(inherit source-package)
|
|
||||||
(name package-name)
|
|
||||||
(build-system emacs-build-system)
|
|
||||||
(source (origin
|
|
||||||
(method (origin-method orig))
|
|
||||||
(uri (origin-uri orig))
|
|
||||||
(sha256 (origin-sha256 orig))
|
|
||||||
(file-name (string-append package-name "-"
|
|
||||||
(package-version source-package)))
|
|
||||||
(modules '((guix build utils)
|
|
||||||
(srfi srfi-1)
|
|
||||||
(ice-9 ftw)))
|
|
||||||
(snippet
|
|
||||||
`(let* ((source-files (quote ,source-files))
|
|
||||||
(basenames (map basename source-files)))
|
|
||||||
(map copy-file
|
|
||||||
source-files basenames)
|
|
||||||
(map delete-file-recursively
|
|
||||||
(fold delete
|
|
||||||
(scandir ".")
|
|
||||||
(append '("." "..") basenames)))
|
|
||||||
#t)))))))
|
|
||||||
|
|
||||||
(define-public emacs-clang-format
|
(define-public emacs-clang-format
|
||||||
(package
|
(package
|
||||||
(inherit clang)
|
(inherit clang)
|
||||||
|
Loading…
Reference in New Issue
Block a user