From b026d900d38ca938fb38219c0ffb117df05dafe6 Mon Sep 17 00:00:00 2001
From: pooryorick <com.digitalsmarties@pooryorick.com>
Date: Mon, 27 Mar 2023 11:13:17 +0000
Subject: Avoid msvc "illegal indirection" error.

---
 generic/tclPathObj.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/generic/tclPathObj.c b/generic/tclPathObj.c
index 2d73379..b6275d4 100644
--- a/generic/tclPathObj.c
+++ b/generic/tclPathObj.c
@@ -2207,7 +2207,7 @@ SetFsPathFromAny(
     fsPathPtr = (FsPath *)Tcl_Alloc(sizeof(FsPath));
 
     if (transPtr == pathPtr) {
-	Tcl_GetStringFromObj(pathPtr, NULL);
+	(void) Tcl_GetStringFromObj(pathPtr, NULL);
 	TclFreeInternalRep(pathPtr);
         transPtr = Tcl_DuplicateObj(pathPtr);
         fsPathPtr->filesystemEpoch = 0;
-- 
cgit v0.12