paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 19:49:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

* From double to triple indirection for the get_device_list function. Reported by Jurassic Pork on forum.

Browse Source
This commit is contained in:
marcoonthegit 2023-10-07 16:40:41 +02:00
parent a3f221e189
commit 018593270b
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/libusb/src/libusb.pp
View File

@ -781,6 +781,7 @@ type
end; end;
plibusb_device=^libusb_device; plibusb_device=^libusb_device;
pplibusb_device=^plibusb_device;
libusb_device = record libusb_device = record
{undefined structure} {undefined structure}
end; end;
@ -1156,7 +1157,7 @@ function libusb_error_name(errcode:integer):pansichar;LIBUSB_CALL;external libus
function libusb_setlocale(const locale:pansichar):integer;LIBUSB_CALL;external libusb1; function libusb_setlocale(const locale:pansichar):integer;LIBUSB_CALL;external libusb1;
function libusb_strerror(errcode:libusb_error):pansichar;LIBUSB_CALL;external libusb1; function libusb_strerror(errcode:libusb_error):pansichar;LIBUSB_CALL;external libusb1;
function libusb_get_device_list(ctx:plibusb_context;var list:plibusb_device):ssize_t;LIBUSB_CALL;external libusb1; function libusb_get_device_list(ctx:plibusb_context;var list:pplibusb_device):ssize_t;LIBUSB_CALL;external libusb1;
procedure libusb_free_device_list(list:plibusb_device;unref_devices:integer);LIBUSB_CALL;external libusb1; procedure libusb_free_device_list(list:plibusb_device;unref_devices:integer);LIBUSB_CALL;external libusb1;
function libusb_ref_device(dev:plibusb_device):plibusb_device;LIBUSB_CALL;external libusb1; function libusb_ref_device(dev:plibusb_device):plibusb_device;LIBUSB_CALL;external libusb1;
procedure libusb_unref_device(dev:plibusb_device);LIBUSB_CALL;external libusb1; procedure libusb_unref_device(dev:plibusb_device);LIBUSB_CALL;external libusb1;