File gnu/packages/vlang.scm changed (mode: 100644) (index 42dd27a915..6f6aa79ce5) |
19 |
19 |
|
|
20 |
20 |
(define-module (gnu packages vlang) |
(define-module (gnu packages vlang) |
21 |
21 |
#:use-module (gnu packages glib) |
#:use-module (gnu packages glib) |
|
22 |
|
#:use-module (gnu packages node) |
|
23 |
|
#:use-module (gnu packages sqlite) |
|
24 |
|
#:use-module (gnu packages tls) |
|
25 |
|
#:use-module (gnu packages xorg) |
22 |
26 |
#:use-module (guix build-system gnu) |
#:use-module (guix build-system gnu) |
23 |
27 |
#:use-module (guix git-download) |
#:use-module (guix git-download) |
24 |
28 |
#:use-module ((guix licenses) #:prefix license:) |
#:use-module ((guix licenses) #:prefix license:) |
|
39 |
43 |
(base32 "1rqi7cah5nq8aggrib9xvdpfjxq20li91svv0w9yny6nn1ag7snx")))) |
(base32 "1rqi7cah5nq8aggrib9xvdpfjxq20li91svv0w9yny6nn1ag7snx")))) |
40 |
44 |
(build-system gnu-build-system) |
(build-system gnu-build-system) |
41 |
45 |
(arguments |
(arguments |
42 |
|
'(#:tests? #f ; some tests are broken |
|
43 |
|
#:make-flags |
|
|
46 |
|
'(#:make-flags |
44 |
47 |
`("CC=gcc" |
`("CC=gcc" |
45 |
48 |
"TMPTCC=tcc" |
"TMPTCC=tcc" |
46 |
49 |
,(string-append "VC=" (assoc-ref %build-inputs "vc")) |
,(string-append "VC=" (assoc-ref %build-inputs "vc")) |
|
58 |
61 |
(("rm -rf") "true") |
(("rm -rf") "true") |
59 |
62 |
(("v self") "v -cc gcc cmd/v")) |
(("v self") "v -cc gcc cmd/v")) |
60 |
63 |
#t)) |
#t)) |
61 |
|
;; A few tests are broken in v 0.1.27. This function should be |
|
62 |
|
;; enabled to run tests in the next release. |
|
63 |
|
;; (replace 'check |
|
64 |
|
;; (lambda _ |
|
65 |
|
;; (let* ((tmpbin "tmp/bin") |
|
66 |
|
;; (gcc (which "gcc"))) |
|
67 |
|
;; (mkdir-p tmpbin) |
|
68 |
|
;; (symlink gcc (string-append tmpbin "/cc")) |
|
69 |
|
;; (setenv "PATH" (string-append tmpbin ":" (getenv "PATH"))) |
|
70 |
|
;; (invoke "./v" "test-fixed")) |
|
71 |
|
;; #t)) |
|
|
64 |
|
(add-before 'check 'delete-failing-tests |
|
65 |
|
;; XXX As always, these should eventually be fixed and run. |
|
66 |
|
(lambda _ |
|
67 |
|
(for-each delete-file |
|
68 |
|
'("vlib/v/gen/x64/tests/x64_test.v" |
|
69 |
|
"vlib/v/tests/repl/repl_test.v" |
|
70 |
|
"vlib/v/tests/valgrind/valgrind_test.v" |
|
71 |
|
"vlib/v/tests/valgrind/strings_and_arrays.vv" |
|
72 |
|
"vlib/v/tests/live_test.v" |
|
73 |
|
"vlib/net/websocket/ws_test.v")) |
|
74 |
|
#t)) |
|
75 |
|
(replace 'check |
|
76 |
|
(lambda* (#:key tests? #:allow-other-keys) |
|
77 |
|
(let* ((bin "tmp/bin") |
|
78 |
|
(gcc (which "gcc"))) |
|
79 |
|
(when tests? |
|
80 |
|
(mkdir-p bin) |
|
81 |
|
(symlink gcc (string-append bin "/cc")) |
|
82 |
|
(setenv "PATH" (string-append bin ":" (getenv "PATH"))) |
|
83 |
|
(invoke "./v" "test-fixed"))) |
|
84 |
|
#t)) |
72 |
85 |
(replace 'install |
(replace 'install |
73 |
86 |
(lambda _ |
(lambda _ |
74 |
87 |
(let* ((bin (string-append (assoc-ref %outputs "out") "/bin")) |
(let* ((bin (string-append (assoc-ref %outputs "out") "/bin")) |
|
106 |
119 |
(commit vc-version))) |
(commit vc-version))) |
107 |
120 |
(file-name (git-file-name "vc" vc-version)) |
(file-name (git-file-name "vc" vc-version)) |
108 |
121 |
(sha256 |
(sha256 |
109 |
|
(base32 "052gp5q2k31r3lci3rx4k0vy0vjdjva64xvrbbihn8lgmw63lc9f"))))))) |
|
|
122 |
|
(base32 "052gp5q2k31r3lci3rx4k0vy0vjdjva64xvrbbihn8lgmw63lc9f"))))) |
|
123 |
|
|
|
124 |
|
;; For the tests. |
|
125 |
|
("libx11" ,libx11) |
|
126 |
|
("node" ,node) |
|
127 |
|
("openssl" ,openssl) |
|
128 |
|
("sqlite" ,sqlite))) |
110 |
129 |
(home-page "https://vlang.io/") |
(home-page "https://vlang.io/") |
111 |
130 |
(synopsis "Compiler for the V programming language") |
(synopsis "Compiler for the V programming language") |
112 |
131 |
(description |
(description |