1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00

Test for out of range depth in fluid-ref*

Test for https://debbugs.gnu.org/cgi/bugreport.cgi?bug=58154, which was
fixed in c0004442b7.
This commit is contained in:
Daniel Llorens 2022-10-03 12:19:58 +02:00
parent 45cc892fe3
commit 584ba588e5

View file

@ -140,6 +140,10 @@
(gc)
(fluid? (g))))
(pass-if-exception "fluid-ref* depth must be nonnegative"
exception:out-of-range
(fluid-ref* (make-fluid) -1))
(with-test-prefix "with-fluids"
(pass-if "with-fluids binds"