FO
bind(C, NAME=GetProcAddress) ?
Типа да
Size: a a a
2021 March 24
D
Хм. Так заработало, если передавать как value
D
function get_library_entry2(library, proc_name) bind(C, name='GetProcAddress')
import
type(C_FUNPTR) :: get_library_entry2
type(C_PTR), intent(in), value :: library
character(kind=C_CHAR), dimension(*), intent(in) :: proc_name
end function get_library_entry2
D
@foxtran получше?
FO
function get_library_entry2(library, proc_name) bind(C, name='GetProcAddress')
import
type(C_FUNPTR) :: get_library_entry2
type(C_PTR), intent(in), value :: library
character(kind=C_CHAR), dimension(*), intent(in) :: proc_name
end function get_library_entry2
Да. Но не уверен про value на c_ptr
FO
Ща погляжу на свой гуанокод
D
Оно работает, если что
D
с новой версией
FO
хорошо :)
FO
function get_library_entry2(library, proc_name) bind(C, name='GetProcAddress')
import
type(C_FUNPTR) :: get_library_entry2
type(C_PTR), intent(in), value :: library
character(kind=C_CHAR), dimension(*), intent(in) :: proc_name
end function get_library_entry2
а можешь прислать сигнатуру
GetProcAddress?D
а можешь прислать сигнатуру
GetProcAddress?этож винапишное
FO
f
Поставил значится ubuntu lts на ноут, всё неплохо! Запустил раст бенчмарк, и... всё зависло к чертовой бабушке - система не откликается уже минут 40. Подожду еще, чтож.
На макоси процессор послабее, но ничо не виснет наглухо. А тут просто в ноль. Ну, подождем еще
На макоси процессор послабее, но ничо не виснет наглухо. А тут просто в ноль. Ну, подождем еще
f
погасил подсветочку на 90%, задумалси...
f
о, заблокировался!
t
охохонюшки
f
свопа наверное на линупсе нету
f
вот оно и загрустило
AO
Плюсовое 😔
Ты где там плюсы увидел