Gabriel Ivăncescu : jscript: Implement WeakMap.clear().

[Alexandre Julliard]

Module: wine
Branch: master
Commit: 6a22b304b20b9d13bc897f6b8ea5820ece14ed68
URL:    https://gitlab.winehq.org/wine/wine/-/commit/6a22b304b20b9d13bc897f6b8ea5820...

Author: Gabriel Ivăncescu 
Date:   Thu Jul 20 16:59:47 2023 +0300

jscript: Implement WeakMap.clear().

Signed-off-by: Gabriel Ivăncescu

---

dlls/jscript/set.c | 16 ++++++++++++++--
 1 file changed, 14 insertions(+), 2 deletions(-)

diff --git a/dlls/jscript/set.c b/dlls/jscript/set.c
index 96375ce4b16..1730abb0328 100644
--- a/dlls/jscript/set.c
+++ b/dlls/jscript/set.c
@@ -669,8 +669,20 @@ void remove_weakmap_entry(struct weakmap_entry *entry)
 static HRESULT WeakMap_clear(script_ctx_t *ctx, jsval_t vthis, WORD flags, unsigned argc, jsval_t *argv,
         jsval_t *r)
 {
-    FIXME("\n");
-    return E_NOTIMPL;
+    WeakMapInstance *weakmap;
+    HRESULT hres;
+
+    hres = get_weakmap_this(ctx, vthis, &weakmap);
+    if(FAILED(hres))
+        return hres;
+
+    TRACE("%p\n", weakmap);
+
+    while(weakmap->map.root)
+        remove_weakmap_entry(RB_ENTRY_VALUE(weakmap->map.root, struct weakmap_entry, entry));
+
+    if(r) *r = jsval_undefined();
+    return S_OK;
 }

static HRESULT WeakMap_delete(script_ctx_t *ctx, jsval_t vthis, WORD flags, unsigned argc, jsval_t *argv,