Eli Zaretskii <e...@gnu.org> skribis: > This test fails on MS-Windows in the MinGW build as follows: > > Backtrace: > In ice-9/boot-9.scm: > 157: 11 [catch #t #<catch-closure d9f620> ...] > In unknown file: > ?: 10 [apply-smob/1 #<catch-closure d9f620>] > In ice-9/boot-9.scm: > 63: 9 [call-with-prompt prompt0 ...] > In ice-9/eval.scm: > 432: 8 [eval # #] > In ice-9/boot-9.scm: > 2401: 7 [save-module-excursion #<procedure db6c80 at > ice-9/boot-9.scm:4045:3 ()>] > 4050: 6 [#<procedure db6c80 at ice-9/boot-9.scm:4045:3 ()>] > 1724: 5 [%start-stack load-stack #<procedure ce4900 at > ice-9/boot-9.scm:4041:10 ()>] > 1729: 4 [#<procedure c0ecd8 ()>] > In unknown file: > ?: 3 [primitive-load > "d:/gnu/guile-2.0.11/test-suite/standalone/test-ffi"] > In ice-9/eval.scm: > 453: 2 [eval # ()] > 387: 1 [eval # ()] > In unknown file: > ?: 0 [dynamic-func "strerror" #<dynamic-object #f>] > ERROR: In procedure dynamic-func: > ERROR: In procedure dynamic-pointer: Symbol not found: strerror > FAIL: test-ffi > > Does this test make some unportable assumptions about the 'strerror' > symbol?
Yes. Since the test just tries to use a global symbol exported from libc, we could use something else. Would ‘gethostname’ work on Windows? That is, does: (dynamic-func "gethostname" (dynamic-link)) return a valid pointer? If the answer is yes, I’ll adapt this test to use this symbol instead. Thanks, Ludo’.
