diff options
author | Ludovic Courtès <ludo@gnu.org> | 2015-11-04 11:59:46 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2015-11-04 11:59:46 +0100 |
commit | 47b3124a8ecf3cf5826ee909776936a3107350f3 (patch) | |
tree | 15a946fe44215990dc5f122b055ae29b72521aa9 | |
parent | f6082affda1dc598199a4bad85dba2d79826159d (diff) | |
download | patches-47b3124a8ecf3cf5826ee909776936a3107350f3.tar patches-47b3124a8ecf3cf5826ee909776936a3107350f3.tar.gz |
tests: Skip 'program-file' test when shebang is too long.
* tests/gexp.scm ("program-file"): Skip when SHEBANG is too long.
-rw-r--r-- | tests/gexp.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/gexp.scm b/tests/gexp.scm index 4860a8e79c..87c774782a 100644 --- a/tests/gexp.scm +++ b/tests/gexp.scm @@ -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))) |