~ruther/guix-local

47b3124a8ecf3cf5826ee909776936a3107350f3 — Ludovic Courtès 10 years ago f6082af
tests: Skip 'program-file' test when shebang is too long.

* tests/gexp.scm ("program-file"): Skip when SHEBANG is too long.
1 files changed, 1 insertions(+), 1 deletions(-)

M tests/gexp.scm
M tests/gexp.scm => tests/gexp.scm +1 -1
@@ 600,7 600,7 @@

;; If we're going to hit the silly shebang limit (128 chars on Linux-based
;; 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"
  (mlet* %store-monad ((n ->   (random (expt 2 50)))