diff options
Diffstat (limited to 'tests/017/setjmp.tl')
| -rw-r--r-- | tests/017/setjmp.tl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/017/setjmp.tl b/tests/017/setjmp.tl index 6cb64b5a..bac25957 100644 --- a/tests/017/setjmp.tl +++ b/tests/017/setjmp.tl @@ -9,7 +9,8 @@ (put-string "libpng longjmp\nlibpng error 42\n") (exit)) -(unless (ignerr (dlopen "libpng.so")) +(unless (ignerr (let ((png (dlopen "libpng.so"))) + (nequal cptr-null (dlsym png "png_set_longjmp_fn")))) (png-fake-output)) ;; needed by png-set-longjmp-fn API |