From 2ad95966db8d5d3dc08068274954cdcb4d23b39b Mon Sep 17 00:00:00 2001
From: Wassim Alhajomar <wassimulator@gmail.com>
Date: Thu, 30 Jul 2026 01:08:30 +0200
Subject: [PATCH] close dangling handle in `map` implementation on Windows

---
 core/mem/virtual/virtual_windows.odin | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/core/mem/virtual/virtual_windows.odin b/core/mem/virtual/virtual_windows.odin
index 768eae711..02d791587 100644
--- a/core/mem/virtual/virtual_windows.odin
+++ b/core/mem/virtual/virtual_windows.odin
@@ -84,6 +84,8 @@ foreign Kernel32 {
 	) -> rawptr ---
 
 	UnmapViewOfFile :: proc(lpBaseAddress: rawptr) -> b32 ---
+
+	CloseHandle :: proc(hObject: rawptr) -> b32 ---
 }
 
 @(no_sanitize_address)
@@ -163,6 +165,7 @@ _map_file :: proc "contextless" (fd: uintptr, size: i64, flags: Map_File_Flags)
 	if handle == nil {
 		return nil, .Map_Failure
 	}
+	defer CloseHandle(handle)
 
 	desired_access: u32
 	if .Read in flags {