1
0
mirror of https://github.com/vlang/v.git synced 2023-08-10 21:13:21 +03:00
v/vlib/dl/dl_test.v

47 lines
990 B
V
Raw Normal View History

2020-04-28 12:53:55 +03:00
import dl
fn test_dl() {
$if linux {
2020-04-29 22:01:19 +03:00
run_test_invalid_lib_linux()
2020-04-28 12:53:55 +03:00
return
}
$if windows {
2020-04-29 22:01:19 +03:00
run_test_invalid_lib_windows()
run_test_valid_lib_windows()
run_test_invalid_sym_windows()
run_test_valid_sym_windows()
2020-04-28 12:53:55 +03:00
return
} $else {
eprint('currently not implemented on this platform')
}
}
2020-04-29 22:01:19 +03:00
fn run_test_invalid_lib_linux() {
2020-04-28 12:53:55 +03:00
// ensure a not-existing dl won't be loaded
2020-05-22 18:36:09 +03:00
h := dl.open('not-existing-dynamic-link-library', dl.rtld_now)
2020-04-28 12:53:55 +03:00
assert h == 0
}
2020-04-29 22:01:19 +03:00
fn run_test_invalid_lib_windows() {
2020-04-28 12:53:55 +03:00
// ensure a not-existing dl won't be loaded
2020-05-22 18:36:09 +03:00
h := dl.open('not-existing-dynamic-link-library', dl.rtld_now)
2020-04-28 12:53:55 +03:00
assert h == 0
}
2020-04-29 22:01:19 +03:00
fn run_test_valid_lib_windows() {
2020-05-22 18:36:09 +03:00
h := dl.open('shell32', dl.rtld_now)
2020-04-29 22:01:19 +03:00
assert h != 0
}
fn run_test_invalid_sym_windows() {
2020-05-22 18:36:09 +03:00
h := dl.open('shell32', dl.rtld_now)
2020-04-29 22:01:19 +03:00
proc := dl.sym(h, 'CommandLineToArgvW2')
assert proc == 0
}
fn run_test_valid_sym_windows() {
2020-05-22 18:36:09 +03:00
h := dl.open('shell32', dl.rtld_now)
2020-04-29 22:01:19 +03:00
proc := dl.sym(h, 'CommandLineToArgvW')
assert proc != 0
}