MSYS2-packages/guile/0304-Skip-tests-using-setrlimit-for-MSYS-as-done-for-Cygwin.patch
Hannes Müller fd90ff2259 guile: update to 3.0.8
- activate check()
- only set configure options which are not set by default
- fix depends for libguile-devel
- add support for gdb guile auto-load
2022-09-30 18:56:34 +02:00

53 lines
1.9 KiB
Diff

From a64825ffa6be30bcb876557383dbdd106da51c99 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hannes=20M=C3=BCller?= <>
Date: Tue, 17 Oct 2017 19:12:41 +0200
Subject: [PATCH] Skip tests using setrlimit for MSYS as done for Cygwin
MSYS2 behaves like Cygwin. Therefore treat them alike.
---
test-suite/standalone/test-out-of-memory | 8 ++++++++
test-suite/standalone/test-stack-overflow | 8 ++++++++
2 files changed, 16 insertions(+)
diff --git a/test-suite/standalone/test-out-of-memory b/test-suite/standalone/test-out-of-memory
index 221651270..4e5ecc81f 100755
--- a/test-suite/standalone/test-out-of-memory
+++ b/test-suite/standalone/test-out-of-memory
@@ -29,6 +29,14 @@ exec guile -q -s "$0" "$@"
;; test-stack-overflow.
(exit 77)) ; unresolved
+(when (string-contains-ci (vector-ref (uname) 0) "MSYS_NT")
+ ;; attempting to use setrlimit for memory RLIMIT_AS will always
+ ;; produce an invalid argument error on MSYS2 (tested on
+ ;; MSYS_NT-6.1-WOW DLL v2.9.0). Proceeding with the test would fill
+ ;; all available memory and probably end in a crash. See also
+ ;; test-stack-overflow.
+ (exit 77)) ; unresolved
+
(catch #t
;; Silence GC warnings.
(lambda ()
diff --git a/test-suite/standalone/test-stack-overflow b/test-suite/standalone/test-stack-overflow
index dd54249d8..83e929159 100755
--- a/test-suite/standalone/test-stack-overflow
+++ b/test-suite/standalone/test-stack-overflow
@@ -29,6 +29,14 @@ exec guile -q -s "$0" "$@"
;; test-out-of-memory.
(exit 77)) ; unresolved
+(when (string-contains-ci (vector-ref (uname) 0) "MSYS_NT")
+ ;; attempting to use setrlimit for memory RLIMIT_AS will always
+ ;; produce an invalid argument error on MSYS2 (tested on
+ ;; MSYS_NT-6.1-WOW DLL v2.9.0). Proceeding with the test would fill
+ ;; all available memory and probably end in a crash. See also
+ ;; test-out-of-memory.
+ (exit 77)) ; unresolved
+
;; 100 MB.
(define *limit* (* 100 1024 1024))
--
2.14.2