me
/
guix
Archived
1
0
Fork 0
Code

gnu: Add lua5.1-bitop. 

* gnu/packages/lua.scm (make-lua-bitop): New procedure.
(lua5.2-bitop): Call make-lua-bitop.
(lua5.1-bitop): New variable.
master
Clément Lassieur 2017-10-23 23:53:53 +02:00
parent 93bfc9693a
commit cb31a52407
No known key found for this signature in database
GPG Key ID: 89F96D4808F359C7
1 changed files with 11 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
gnu/packages/lua.scm
View File

@ -6,7 +6,7 @@
;;; Copyright © 2016, 2017 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2016, 2017 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2016 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2016 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2016 doncatnip <gnopap@gmail.com> ;;; Copyright © 2016 doncatnip <gnopap@gmail.com>
;;; Copyright © 2016 Clément Lassieur <clement@lassieur.org> ;;; Copyright © 2016, 2017 Clément Lassieur <clement@lassieur.org>
;;; Copyright © 2016 José Miguel Sánchez García <jmi2k@openmailbox.org> ;;; Copyright © 2016 José Miguel Sánchez García <jmi2k@openmailbox.org>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
@ -415,9 +415,9 @@ Grammars (PEGs).")
(inputs `(("lua", lua-5.2))))) (inputs `(("lua", lua-5.2)))))
;; Lua 5.3 is not supported. ;; Lua 5.3 is not supported.
(define-public lua5.2-bitop (define (make-lua-bitop name lua)
(package (package
(name "lua5.2-bitop") (name name)
(version "1.0.2") (version "1.0.2")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
@ -434,15 +434,21 @@ Grammars (PEGs).")
(string-append "INSTALLPATH=printf " (string-append "INSTALLPATH=printf "
(assoc-ref %outputs "out") (assoc-ref %outputs "out")
"/lib/lua/" "/lib/lua/"
,(version-major+minor (package-version lua-5.2)) ,(version-major+minor (package-version lua))
"/bit/bit.so")) "/bit/bit.so"))
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(delete 'configure)))) (delete 'configure))))
(inputs `(("lua", lua-5.2))) (inputs `(("lua", lua)))
(home-page "http://bitop.luajit.org/index.html") (home-page "http://bitop.luajit.org/index.html")
(synopsis "Bitwise operations on numbers for Lua") (synopsis "Bitwise operations on numbers for Lua")
(description (description
"Lua BitOp is a C extension module for Lua which adds bitwise operations "Lua BitOp is a C extension module for Lua which adds bitwise operations
on numbers.") on numbers.")
(license license:expat))) (license license:expat)))
(define-public lua5.2-bitop
(make-lua-bitop "lua5.2-bitop" lua-5.2))
(define-public lua5.1-bitop
(make-lua-bitop "lua5.1-bitop" lua-5.1))