ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-24 21:38:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

tests: Skip 'program-file' test when shebang is too long.

Browse source 
* tests/gexp.scm ("program-file"): Skip when SHEBANG is too long.
This commit is contained in:
Ludovic Courtès 2015-11-04 11:59:46 +01:00
parent f6082affda
commit 47b3124a8e
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
tests/gexp.scm
View file

@ -600,7 +600,7 @@ (define shebang
;; If we're going to hit the silly shebang limit (128 chars on Linux-based ;; If we're going to hit the silly shebang limit (128 chars on Linux-based
;; systems), then skip the following test. ;; systems), then skip the following test.
(test-skip (if (> (string-length shebang) 127) 1 0)) (test-skip (if (> (string-length shebang) 127) 2 0))
(test-assertm "gexp->script" (test-assertm "gexp->script"
(mlet* %store-monad ((n -> (random (expt 2 50))) (mlet* %store-monad ((n -> (random (expt 2 50)))