Esdras Tarsis : bthprops.cpl: Add BluetoothFindNextDevice stub.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: 43a9783585eb4ce747eebe3dbb611fcd147310d4
URL:    https://source.winehq.org/git/wine.git/?a=commit;h=43a9783585eb4ce747eebe3dbb611fcd147310d4

Author: Esdras Tarsis <esdrastarsis at gmail.com>
Date:   Sat Aug 14 19:34:16 2021 -0300

bthprops.cpl: Add BluetoothFindNextDevice stub.

Signed-off-by: Esdras Tarsis <esdrastarsis at gmail.com>
Signed-off-by: Alexandre Julliard <julliard at winehq.org>

---

 dlls/bthprops.cpl/bthprops.cpl.spec |  2 +-
 dlls/bthprops.cpl/main.c            | 10 ++++++++++
 dlls/irprops.cpl/irprops.cpl.spec   |  2 +-
 3 files changed, 12 insertions(+), 2 deletions(-)

diff --git a/dlls/bthprops.cpl/bthprops.cpl.spec b/dlls/bthprops.cpl/bthprops.cpl.spec
index d57eb9136e6..30b5bfa0040 100644
--- a/dlls/bthprops.cpl/bthprops.cpl.spec
+++ b/dlls/bthprops.cpl/bthprops.cpl.spec
@@ -23,7 +23,7 @@
 @ stub BluetoothFindFirstServiceEx
 @ stub BluetoothFindNextBrowseGroup
 @ stub BluetoothFindNextClassId
-@ stub BluetoothFindNextDevice
+@ stdcall BluetoothFindNextDevice(ptr ptr)
 @ stub BluetoothFindNextProfileDescriptor
 @ stub BluetoothFindNextProtocolDescriptorStack
 @ stub BluetoothFindNextProtocolEntry
diff --git a/dlls/bthprops.cpl/main.c b/dlls/bthprops.cpl/main.c
index 672b682a29d..2dcb18458b7 100644
--- a/dlls/bthprops.cpl/main.c
+++ b/dlls/bthprops.cpl/main.c
@@ -89,3 +89,13 @@ DWORD WINAPI BluetoothGetRadioInfo(HANDLE radio, PBLUETOOTH_RADIO_INFO info)
     FIXME("(%p, %p): stub!\n", radio, info);
     return ERROR_CALL_NOT_IMPLEMENTED;
 }
+
+/*********************************************************************
+ *  BluetoothFindNextDevice
+ */
+BOOL WINAPI BluetoothFindNextDevice(HBLUETOOTH_DEVICE_FIND find, BLUETOOTH_DEVICE_INFO *info)
+{
+    FIXME("(%p, %p): stub!\n", find, info);
+    SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
+    return FALSE;
+}
diff --git a/dlls/irprops.cpl/irprops.cpl.spec b/dlls/irprops.cpl/irprops.cpl.spec
index a3e5faa7076..252410f589f 100644
--- a/dlls/irprops.cpl/irprops.cpl.spec
+++ b/dlls/irprops.cpl/irprops.cpl.spec
@@ -19,7 +19,7 @@
 @ stub BluetoothFindFirstService
 @ stub BluetoothFindNextBrowseGroup
 @ stub BluetoothFindNextClassId
-@ stub BluetoothFindNextDevice
+@ stdcall BluetoothFindNextDevice(ptr ptr) bthprops.cpl.BluetoothFindNextDevice
 @ stub BluetoothFindNextProfileDescriptor
 @ stub BluetoothFindNextProtocolDescriptorStack
 @ stub BluetoothFindNextProtocolEntry