mike121 pushed a commit to branch wip-mingw-2025
in repository guile.

commit 1e0cf93a0aac4c5cb533a554e2f4466002db3458
Author: Michael Gran <spk...@yahoo.com>
AuthorDate: Thu Oct 20 22:09:43 2022 -0700

    handle different errors messages for unbound variables
---
 test-suite/tests/syntax.test | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/test-suite/tests/syntax.test b/test-suite/tests/syntax.test
index 4872866ab..4b4ed6eb1 100644
--- a/test-suite/tests/syntax.test
+++ b/test-suite/tests/syntax.test
@@ -91,7 +91,8 @@
   "sequence of zero expressions")
 
 (define exception:variable-ref
-  '(misc-error . "Unbound variable"))
+  ;; Catch both "Variable is unbound" and "Unbound variable"
+  '(misc-error . "nbound"))
 
 ;; (put 'pass-if-syntax-error 'scheme-indent-function 1)
 (define-syntax pass-if-syntax-error

Reply via email to