mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-23 11:09:41 -05:00
gnu: p2c: Update to 2.02.
* gnu/packages/pascal.scm (p2c): Update to 2.02. [arguments]: Use gexp. [native-inputs]: Add unzip.
This commit is contained in:
parent
fd4ca4a266
commit
4651d380b4
1 changed files with 28 additions and 30 deletions
|
@ -3,6 +3,7 @@
|
||||||
;;; Copyright © 2017 Kei Kebreau <address@hidden>
|
;;; Copyright © 2017 Kei Kebreau <address@hidden>
|
||||||
;;; Copyright © 2020 Eric Bavier <bavier@posteo.net>
|
;;; Copyright © 2020 Eric Bavier <bavier@posteo.net>
|
||||||
;;; Copyright © 2021 Maxim Cournoyer <maxim.cournoyer@gmail.com>
|
;;; Copyright © 2021 Maxim Cournoyer <maxim.cournoyer@gmail.com>
|
||||||
|
;;; Copyright © 2022 Ricardo Wurmus <rekado@elephly.net>
|
||||||
;;;
|
;;;
|
||||||
;;; This file is part of GNU Guix.
|
;;; This file is part of GNU Guix.
|
||||||
;;;
|
;;;
|
||||||
|
@ -23,6 +24,7 @@ (define-module (gnu packages pascal)
|
||||||
#:use-module ((guix licenses) #:prefix license:)
|
#:use-module ((guix licenses) #:prefix license:)
|
||||||
#:use-module (guix packages)
|
#:use-module (guix packages)
|
||||||
#:use-module (guix download)
|
#:use-module (guix download)
|
||||||
|
#:use-module (guix gexp)
|
||||||
#:use-module (guix utils)
|
#:use-module (guix utils)
|
||||||
#:use-module (guix build-system gnu)
|
#:use-module (guix build-system gnu)
|
||||||
#:use-module (gnu packages)
|
#:use-module (gnu packages)
|
||||||
|
@ -229,43 +231,39 @@ (define-public fpc
|
||||||
(define-public p2c
|
(define-public p2c
|
||||||
(package
|
(package
|
||||||
(name "p2c")
|
(name "p2c")
|
||||||
(version "2.01")
|
(version "2.02")
|
||||||
(source (origin
|
(source (origin
|
||||||
(method url-fetch)
|
(method url-fetch)
|
||||||
(uri (string-append "https://alum.mit.edu/www/toms/p2c/p2c-"
|
(uri (string-append "http://users.fred.net/tds/lab/p2c/p2c-"
|
||||||
version ".tar.gz"))
|
version ".zip"))
|
||||||
(sha256
|
(sha256
|
||||||
(base32
|
(base32
|
||||||
"03x72lv6jrvikbrpz4kfq1xp61l2jw5ki6capib71lxs65zndajn"))))
|
"17q6s0vbz298pks80bxf4r6gm8kwbrml1q3vfs6g6yj75sqj58xs"))))
|
||||||
(build-system gnu-build-system)
|
(build-system gnu-build-system)
|
||||||
(arguments
|
(arguments
|
||||||
`(#:make-flags
|
(list
|
||||||
(let ((out (assoc-ref %outputs "out")))
|
#:make-flags
|
||||||
(list (string-append "CC=" ,(cc-for-target))
|
#~(list (string-append "CC=" #$(cc-for-target))
|
||||||
(string-append "HOMEDIR=" out "/lib/p2c")
|
(string-append "HOMEDIR=" #$output "/lib/p2c")
|
||||||
(string-append "INCDIR=" out "/include/p2c")
|
(string-append "INCDIR=" #$output "/include/p2c")
|
||||||
(string-append "BINDIR=" out "/bin")
|
(string-append "BINDIR=" #$output "/bin")
|
||||||
(string-append "LIBDIR=" out "/lib")
|
(string-append "LIBDIR=" #$output "/lib")
|
||||||
(string-append "MANDIR=" out "/share/man/man1")
|
(string-append "MANDIR=" #$output "/share/man/man1")
|
||||||
"MANFILE=p2c.man.inst"))
|
"MANFILE=p2c.man.inst")
|
||||||
#:test-target "test"
|
#:test-target "test"
|
||||||
#:phases
|
#:phases
|
||||||
(modify-phases %standard-phases
|
#~(modify-phases %standard-phases
|
||||||
(delete 'configure)
|
(delete 'configure)
|
||||||
(add-before 'build 'mkdir
|
(add-before 'build 'mkdir
|
||||||
(lambda* (#:key outputs #:allow-other-keys)
|
(lambda _
|
||||||
(let ((out (assoc-ref outputs "out")))
|
(mkdir-p (string-append #$output "/share/man"))
|
||||||
(mkdir-p (string-append out "/share/man"))
|
(mkdir-p (string-append #$output "/lib"))
|
||||||
(mkdir-p (string-append out "/lib"))
|
(mkdir-p (string-append #$output "/bin"))
|
||||||
(mkdir-p (string-append out "/bin"))
|
(mkdir-p (string-append #$output "/include"))))
|
||||||
(mkdir-p (string-append out "/include")))
|
(add-before 'build 'chdir
|
||||||
#t))
|
(lambda _ (chdir "src"))))))
|
||||||
(add-before 'build 'chdir
|
|
||||||
(lambda* (#:key make-flags #:allow-other-keys)
|
|
||||||
(chdir "src")
|
|
||||||
#t)))))
|
|
||||||
(native-inputs
|
(native-inputs
|
||||||
(list perl which))
|
(list perl unzip which))
|
||||||
(synopsis "p2c converts Pascal programs to C programs")
|
(synopsis "p2c converts Pascal programs to C programs")
|
||||||
(description "This package provides @command{p2c}, a program to convert
|
(description "This package provides @command{p2c}, a program to convert
|
||||||
Pascal source code to C source code, and @command{p2cc}, a compiler for
|
Pascal source code to C source code, and @command{p2cc}, a compiler for
|
||||||
|
|
Loading…
Reference in a new issue