gentoo auto-resync : 06:03:2025 - 01:47:31next

5 files changed, 523 insertions, 6 deletions

diff --git a/dev-tcltk/Manifest.gz b/dev-tcltk/Manifest.gz
index f61969b20758..b5f07c164796 100644
--- a/dev-tcltk/Manifest.gz
+++ b/dev-tcltk/Manifest.gz
diff --git a/dev-tcltk/tdom/Manifest b/dev-tcltk/tdom/Manifest
index d9491555969f..617b4019b0a3 100644
--- a/dev-tcltk/tdom/Manifest
+++ b/dev-tcltk/tdom/Manifest
@@ -1,8 +1,9 @@
 AUX tdom-0.9.2-useCC.patch 868 BLAKE2B e5d41422bfd8336dacbd177f16b19126f3af1a2ddffaa1f8676546b4db29a5adc679ff4bccf3debe32bc656c3d8b5d9523c6d6a478a202ae739b6e2a08597624 SHA512 59388e3ffa2c21daae3770c2d337337ec28c0845286114337e23c374c310a2dc6f790d6df4ec6f8b741040936cce021197aaf76fd162aca2f391fb480d057d20
 AUX tdom-0.9.3-expat.patch 255 BLAKE2B e6d8add83b294a178aab7d23e4432e3f55f001096ee5fa6ea0620ca2336555a30bc841c88ca4e33b15abeb86159cdb6925aa5f61781dca2ff6c8260031359962 SHA512 c94e03bea0909d5cc2ec6f479fd6abf430f2d0c3c6df1186a01d1c422322d54ca7e7009ac07329eabac6432bf75cbe0db7f3b529cca89bd4b9c2589b0f57d5d3
 AUX tdom-0.9.4-useCC.patch 887 BLAKE2B d71d42b6c3f2a2b31fb7ac692db8c94c666ae81d1cba80004b151721bcc7196bc266c57848934ed66216f20fa48d98a1f7f14f44d1971d0e6fd9422acef6f0f3 SHA512 4f6b3564cd4c8d0c9573ddc53d156958b00fec21e1afd080937b72b50867731140ee1b0ea53bf52a023a14a77ef24dbcc6f06679f60ce6934432f8af43b0b801
+AUX tdom-0.9.5-fix-c23.patch 17578 BLAKE2B db998e77c5c6efe1ab2824fd21c4a14671ccca2e118a374d62e4e9d475719883be857123398364f7be5ce02466e56dbf9cc56518d7576272b4123c77895ef3e4 SHA512 3eba1db4f34c421ed17088f3225bfdeb4ff8a25c4e6719987849990b4dc62396cd330d14233c162825a5d3490619ae3682200a3703c23c810b227e1d850b5f9a
 DIST tdom-0.9.3-src.tgz 1319804 BLAKE2B 8b4c50407eaf28c002ec8399d44881b91bef346dca75370c27e06266a5fa90900528a01fc8310d8a250f551e3a627d0d2965a2e85ef8a9132010f7718e5549ce SHA512 71a589465f84721f222b6312f51ee564d11d88a82000a0e5cc1dab4653bffd57347a39936590b62a580e9df59d7266ff3ae4295fe91ff4b9e58f012e80b0cb3e
 DIST tdom-0.9.5-src.tgz 1512934 BLAKE2B 4e706d5378f2421fc21742327fe40ac106488c7523f33e90261d05c3969797fa35d7e5f785346c9a83fa6aadeff53a9e11a710d4ce32c38db332018b9e997c49 SHA512 84b35ec00744d04f184638b95d6b34f008087f48852a8734ce17c491f6d4c5f1208a8dcc041b5a3bf0253af41ab91677ab2b2d978d00807c687585e41c909979
-EBUILD tdom-0.9.3.ebuild 1810 BLAKE2B 23b59fde31fc3cd6b622be0745b8e369e15861b92e62de2959f8f627f0a131d251f65999532d42f733992973a43fbc3c17be56ed5861d6c2eb296fd19c918006 SHA512 e87d31e079f650fa031c73c06855feb704310900d65d6eafdace89e79062a2a11eec19e5390af1c9b556dd4850171cc9f18d0c61f9dbe5bfc5c981489b8fc3a6
-EBUILD tdom-0.9.5.ebuild 1731 BLAKE2B 1525cadccbfc711d455c57f6df67f77404ddbc951a85c33e7a94731c926ee41ede33656d2514644288ccff4b3e6cbb5200fdaac3e294c1bb30b61895c37ecd59 SHA512 55c6b8c3f0476c84da53d03178cef4977858a30a219a382c18b45966fabe55887269ad120bc47f28dbbf4179d6b5f06b2b5fcbb9647791fc38364e9378d593e1
+EBUILD tdom-0.9.3.ebuild 1820 BLAKE2B 1b5a67941c0df681c06007ec7ea6e9e8d302f3fb8c6ac84174d942037fd3b7b4f20f6da5a8df836335da64e9c42da4e67b653a771f2a63ecc3cfb544791ce778 SHA512 a0188ceb7cfecdc121be92bd42f02280b9c0ec10492357635d20187a181592c47906ec40bb7dddd3a4b14481b36066de2881068cd09b0f4ee280ae4fb8c63fae
+EBUILD tdom-0.9.5.ebuild 1782 BLAKE2B ded3e9a44b3b26f0fc4c464633182ccc2f013472912fef2bcb40c9ace4b30c5406e66e28ae5c4bb8ad4e9048934d34f97db343900313a6676db388bbfc29a7ea SHA512 2d2a256f297b6990f5ce3477a53d909727212b0da94ac59f77095b014b792c6fe12481a2cb023bb288e6f82cc32dfc5c383012baeea60187a221935580109516
 MISC metadata.xml 622 BLAKE2B 161871f522bbaa638ba5980f62f693f4022d9a830225aa645786e4adf43f525ce0fdeae3d26136db09db45d94ac271547a1abb86e1a639e57859bd688e14627e SHA512 557c17a5eda00ec07212dfa9ef7cac6e1688839bad2a59cdd32276773de955cf068ad793a93e371e779cf3dac2b6e81b91a82946ebd4805b7b6e9754f8110ec9
diff --git a/dev-tcltk/tdom/files/tdom-0.9.5-fix-c23.patch b/dev-tcltk/tdom/files/tdom-0.9.5-fix-c23.patch
new file mode 100644
index 000000000000..ad8a5af4d40b
--- /dev/null
+++ b/dev-tcltk/tdom/files/tdom-0.9.5-fix-c23.patch
@@ -0,0 +1,515 @@
+https://bugs.gentoo.org/943934
+https://core.tcl-lang.org/tdom/info/2db2c391674a7cc3
+
+Amended to remove https://core.tcl-lang.org/tdom/info/8a8dee52e5eb58d4
+
+--- a/generic/datatypes.c
++++ b/generic/datatypes.c
+@@ -225,11 +225,11 @@
+     void *constraintData,
+     char *text
+     )
+ {
+     tclTCData *tcdata = constraintData;
+-    int result, bool;
++    int result, boolVal;
+ 
+     tcdata->evalStub[tcdata->nrArg-1] = Tcl_NewStringObj(text, -1);
+     Tcl_IncrRefCount (tcdata->evalStub[tcdata->nrArg-1]);
+     tcdata->sdata->currentEvals++;
+     result = Tcl_EvalObjv (interp, tcdata->nrArg, tcdata->evalStub,
+@@ -238,15 +238,15 @@
+     Tcl_DecrRefCount (tcdata->evalStub[tcdata->nrArg-1]);
+     if (result != TCL_OK) {
+         tcdata->sdata->evalError = 1;
+         return 0;
+     }
+-    result = Tcl_GetBooleanFromObj (interp, Tcl_GetObjResult (interp), &bool);
++    result = Tcl_GetBooleanFromObj (interp, Tcl_GetObjResult (interp), &boolVal);
+     if (result != TCL_OK) {
+         return 0;
+     }
+-    if (bool) {
++    if (boolVal) {
+         return 1;
+     } 
+     return 0;
+ }
+ 
+
+--- a/generic/dom.c
++++ b/generic/dom.c
+@@ -5489,11 +5489,11 @@
+     int objc,
+     Tcl_Obj *const objv[]
+     )
+ {
+     CHandlerSet     *handlerSet;
+-    int              methodIndex, result, bool;
++    int              methodIndex, result, boolVal;
+     tdomCmdReadInfo *info;
+     TclGenExpatInfo *expat;
+     Tcl_Obj         *newObjName = NULL;
+ 
+     static const char *tdomMethods[] = {
+@@ -5601,14 +5601,14 @@
+             Tcl_SetResult (interp, "parser object isn't tdom enabled.", NULL);
+             return TCL_ERROR;
+         }
+         Tcl_SetIntObj (Tcl_GetObjResult (interp), info->storeLineColumn);
+         if (objc == 4) {
+-            if (Tcl_GetBooleanFromObj (interp, objv[3], &bool) != TCL_OK) {
++            if (Tcl_GetBooleanFromObj (interp, objv[3], &boolVal) != TCL_OK) {
+                 return TCL_ERROR;
+             }
+-            info->storeLineColumn = bool;
++            info->storeLineColumn = boolVal;
+         }
+         info->tdomStatus = 1;
+         break;
+         
+     case m_remove:
+@@ -5656,15 +5656,15 @@
+         if (!info) {
+             Tcl_SetResult (interp, "parser object isn't tdom enabled.", NULL);
+             return TCL_ERROR;
+         }
+         Tcl_SetIntObj (Tcl_GetObjResult (interp), info->ignoreWhiteSpaces);
+-        if (Tcl_GetBooleanFromObj (interp, objv[3], &bool) != TCL_OK) {
++        if (Tcl_GetBooleanFromObj (interp, objv[3], &boolVal) != TCL_OK) {
+             return TCL_ERROR;
+         }
+-        info->ignoreWhiteSpaces = !bool;
+-        handlerSet->ignoreWhiteCDATAs = !bool;
++        info->ignoreWhiteSpaces = !boolVal;
++        handlerSet->ignoreWhiteCDATAs = !boolVal;
+         info->tdomStatus = 1;
+         break;
+ 
+     case m_keepCDATA:
+         if (objc != 4) {
+@@ -5680,14 +5680,14 @@
+         info = handlerSet->userData;
+         if (!info) {
+             Tcl_SetResult (interp, "parser object isn't tdom enabled.", NULL);
+             return TCL_ERROR;
+         }
+-        if (Tcl_GetBooleanFromObj (interp, objv[3], &bool) != TCL_OK) {
++        if (Tcl_GetBooleanFromObj (interp, objv[3], &boolVal) != TCL_OK) {
+             return TCL_ERROR;
+         }
+-        if (bool) {
++        if (boolVal) {
+             handlerSet->startCdataSectionCommand = tdom_startCDATA;
+             handlerSet->endCdataSectionCommand = endCDATA;
+         } else {
+             handlerSet->startCdataSectionCommand = NULL;
+             handlerSet->endCdataSectionCommand = NULL;
+@@ -5709,15 +5709,15 @@
+         info = handlerSet->userData;
+         if (!info) {
+             Tcl_SetResult (interp, "parser object isn't tdom enabled.", NULL);
+             return TCL_ERROR;
+         }
+-        if (Tcl_GetBooleanFromObj (interp, objv[3], &bool) != TCL_OK) {
++        if (Tcl_GetBooleanFromObj (interp, objv[3], &boolVal) != TCL_OK) {
+             return TCL_ERROR;
+         }
+         expat = GetExpatInfo (interp, objv[1]);
+-        expat->keepTextStart = bool;
++        expat->keepTextStart = boolVal;
+         expat->cdataStartLine = 0;
+         break;
+         
+     case m_ignorexmlns:
+         info = CHandlerSetGetUserData (interp, objv[1], "tdom");
+@@ -5725,17 +5725,17 @@
+             Tcl_SetResult (interp, "parser object isn't tdom enabled.", NULL);
+             return TCL_ERROR;
+         }
+         Tcl_SetIntObj (Tcl_GetObjResult (interp), info->ignorexmlns);
+         if (objc == 4) {
+-            if (Tcl_GetBooleanFromObj (interp, objv[3], &bool) != TCL_OK) {
++            if (Tcl_GetBooleanFromObj (interp, objv[3], &boolVal) != TCL_OK) {
+                 return TCL_ERROR;
+             }
+-            info->ignorexmlns = bool;
++            info->ignorexmlns = boolVal;
+         }
+         info->tdomStatus = 1;
+         break;
+ 
+     }
+ 
+     return TCL_OK;
+ }
+
+--- a/generic/tcldom.c
++++ b/generic/tcldom.c
+@@ -3400,12 +3400,12 @@
+ typedef struct 
+ {
+     Tcl_Obj  *object;
+     Tcl_Obj  *array;
+     Tcl_Obj  *null;
+-    Tcl_Obj  *true;
+-    Tcl_Obj  *false;
++    Tcl_Obj  *trueVal;
++    Tcl_Obj  *falseVal;
+     Tcl_Obj  *number;
+     Tcl_Obj  *string;
+ } asTypedListTypes;
+ 
+ 
+@@ -3476,14 +3476,14 @@
+         switch (node->info) {
+         case JSON_NULL:
+             Tcl_ListObjAppendElement (NULL, resultObj, c->null);
+             break;
+         case JSON_TRUE:
+-            Tcl_ListObjAppendElement (NULL, resultObj, c->true);
++            Tcl_ListObjAppendElement (NULL, resultObj, c->trueVal);
+             break;
+         case JSON_FALSE:
+-            Tcl_ListObjAppendElement (NULL, resultObj, c->false);
++            Tcl_ListObjAppendElement (NULL, resultObj, c->falseVal);
+             break;
+         case JSON_NUMBER:
+             textNode = (domTextNode *)node;
+             if (isJSONNumber (textNode->nodeValue, textNode->valueLength)) {
+                 Tcl_ListObjAppendElement(NULL, resultObj, c->number);
+@@ -3520,20 +3520,20 @@
+     }
+ 
+     c.object = Tcl_NewStringObj ("OBJECT", 6);
+     c.array = Tcl_NewStringObj ("ARRAY", 5);
+     c.null = Tcl_NewStringObj ("NULL", 4);
+-    c.true = Tcl_NewStringObj ("TRUE", 4);
+-    c.false = Tcl_NewStringObj ("FALSE", 5);
++    c.trueVal = Tcl_NewStringObj ("TRUE", 4);
++    c.falseVal = Tcl_NewStringObj ("FALSE", 5);
+     c.number = Tcl_NewStringObj ("NUMBER", 6);
+     c.string = Tcl_NewStringObj ("STRING", 6);
+ 
+     Tcl_IncrRefCount (c.object);
+     Tcl_IncrRefCount (c.array);
+     Tcl_IncrRefCount (c.null);
+-    Tcl_IncrRefCount (c.true);
+-    Tcl_IncrRefCount (c.false);
++    Tcl_IncrRefCount (c.trueVal);
++    Tcl_IncrRefCount (c.falseVal);
+     Tcl_IncrRefCount (c.number);
+     Tcl_IncrRefCount (c.string);
+ 
+     if (node->nodeType == ELEMENT_NODE
+         && node->info == 0
+@@ -3547,12 +3547,12 @@
+                       tcldom_treeAsTypedListWorker (node, &c));
+ 
+     Tcl_DecrRefCount (c.object);
+     Tcl_DecrRefCount (c.array);
+     Tcl_DecrRefCount (c.null);
+-    Tcl_DecrRefCount (c.true);
+-    Tcl_DecrRefCount (c.false);
++    Tcl_DecrRefCount (c.trueVal);
++    Tcl_DecrRefCount (c.falseVal);
+     Tcl_DecrRefCount (c.number);
+     Tcl_DecrRefCount (c.string);
+ }
+ 
+ /*----------------------------------------------------------------------------
+@@ -3600,11 +3600,11 @@
+     Tcl_Obj    *const objv[]
+ )
+ {
+     char          *channelId, prefix[MAX_PREFIX_LEN];
+     const char    *localName;
+-    int            indent, mode, bool;
++    int            indent, mode, boolVal;
+     int            outputFlags = 0;
+     int            optionIndex, cdataChild;
+     Tcl_Obj       *resultPtr, *encString = NULL;
+     Tcl_Channel    chan = (Tcl_Channel) NULL;
+     Tcl_HashEntry *h;
+@@ -3716,15 +3716,15 @@
+             if (objc < 4) {
+                 SetResult("-doctypeDeclaration must have a boolean value "
+                           "as argument");
+                 goto cleanup;
+             }
+-            if (Tcl_GetBooleanFromObj(interp, objv[3], &bool)
++            if (Tcl_GetBooleanFromObj(interp, objv[3], &boolVal)
+                 != TCL_OK) {
+                 goto cleanup;
+             }
+-            if (bool) outputFlags |= SERIALIZE_DOCTYPE_DECLARATION;
++            if (boolVal) outputFlags |= SERIALIZE_DOCTYPE_DECLARATION;
+             objc -= 2;
+             objv += 2;
+             break;
+ 
+         case m_xmlDeclaration:
+@@ -3731,15 +3731,15 @@
+             if (objc < 4) {
+                 SetResult("-xmlDeclaration must have a boolean value "
+                           "as argument");
+                 goto cleanup;
+             }
+-            if (Tcl_GetBooleanFromObj(interp, objv[3], &bool)
++            if (Tcl_GetBooleanFromObj(interp, objv[3], &boolVal)
+                 != TCL_OK) {
+                 goto cleanup;
+             }
+-            if (bool) outputFlags |= SERIALIZE_XML_DECLARATION;
++            if (boolVal) outputFlags |= SERIALIZE_XML_DECLARATION;
+             objc -= 2;
+             objv += 2;
+             break;
+ 
+         case m_encString:
+@@ -4933,11 +4933,11 @@
+     const char  *localName, *uri, *nsStr;
+     int          result, methodIndex, i;
+     domLength    length;
+     XML_Size     line, column;
+     XML_Index    byteIndex;
+-    int          nsIndex, bool, hnew, legacy, jsonType;
++    int          nsIndex, boolVal, hnew, legacy, jsonType;
+     Tcl_Obj     *namePtr, *resultPtr;
+     Tcl_Obj     *mobjv[MAX_REWRITE_ARGS], *storedErrMsg;
+     Tcl_CmdInfo  cmdInfo;
+     Tcl_HashEntry *h;
+ 
+@@ -5945,14 +5945,14 @@
+                 return TCL_ERROR;
+             }
+             SetIntResult(
+                 (((node->nodeFlags & DISABLE_OUTPUT_ESCAPING) == 0) ? 0 : 1));
+             if (objc == 3) {
+-                if (Tcl_GetBooleanFromObj(interp, objv[2], &bool) != TCL_OK) {
++                if (Tcl_GetBooleanFromObj(interp, objv[2], &boolVal) != TCL_OK) {
+                     return TCL_ERROR;
+                 }
+-                if (bool) {
++                if (boolVal) {
+                     node->nodeFlags |= DISABLE_OUTPUT_ESCAPING;
+                 } else {
+                     node->nodeFlags &= (~DISABLE_OUTPUT_ESCAPING);
+                 }
+             }
+@@ -5990,20 +5990,20 @@
+             FREE (str);
+             return TCL_OK;
+ 
+         case m_normalize:
+             CheckArgs (2,3,2, "?-forXPath?");
+-            bool = 0;
++            boolVal = 0;
+             if (objc == 3) {
+                 if (strcmp (Tcl_GetString(objv[2]), "-forXPath") == 0) {
+-                    bool = 1;
++                    boolVal = 1;
+                 } else {
+                     SetResult("unknown option! Options: ?-forXPath?");
+                     return TCL_ERROR;
+                 }
+             }
+-            domNormalize (node, bool, tcldom_deleteNode, interp);
++            domNormalize (node, boolVal, tcldom_deleteNode, interp);
+             return TCL_OK;
+ 
+         case m_jsonType:
+             CheckArgs (2,3,2, "?jsonType?");
+             if (node->nodeType != ELEMENT_NODE
+@@ -6073,11 +6073,11 @@
+ 
+     domDeleteInfo       * dinfo;
+     domDocument         * doc;
+     char                * method, *tag, *data, *target, *uri, tmp[100];
+     char                * str, *docName, *errMsg;
+-    int                   methodIndex, result, i, nsIndex, forXPath, bool;
++    int                   methodIndex, result, i, nsIndex, forXPath, boolVal;
+     int                   setDocumentElement = 0, restoreDomCreateCmdMode = 0;
+     domLength             data_length, target_length;
+     domNode             * n;
+     Tcl_CmdInfo           cmdInfo;
+     Tcl_Obj             * mobjv[MAX_REWRITE_ARGS], *storedErrMsg;
+@@ -6420,14 +6420,14 @@
+                 SetBooleanResult (1);
+             } else {
+                 SetBooleanResult(0);
+             }
+             if (objc == 3) {
+-                if (Tcl_GetBooleanFromObj (interp, objv[2], &bool) != TCL_OK) {
++                if (Tcl_GetBooleanFromObj (interp, objv[2], &boolVal) != TCL_OK) {
+                     return TCL_ERROR;
+                 }
+-                if (bool) {
++                if (boolVal) {
+                     doc->nodeFlags |= OUTPUT_DEFAULT_INDENT;
+                 } else {
+                     doc->nodeFlags &= ~OUTPUT_DEFAULT_INDENT;
+                 }
+             }
+@@ -7831,11 +7831,11 @@
+ {
+     GetTcldomDATA;
+ 
+     char        * method, tmp[300], *string, *option,
+                  *replacement;
+-    int           methodIndex, result, i, bool, changed;
++    int           methodIndex, result, i, boolVal, changed;
+     domLength     repllen;
+     Tcl_CmdInfo   cmdInfo;
+     Tcl_Obj     * mobjv[MAX_REWRITE_ARGS], *newObj, *storedErrMsg;
+     Tcl_DString   cleardString, escapedStr;
+ 
+@@ -7992,34 +7992,34 @@
+             break;
+ #endif
+ 
+         case m_setStoreLineColumn:
+             if (objc == 3) {
+-                if (Tcl_GetBooleanFromObj(interp, objv[2], &bool) != TCL_OK) {
++                if (Tcl_GetBooleanFromObj(interp, objv[2], &boolVal) != TCL_OK) {
+                     return TCL_ERROR;
+                 }
+-                TcldomDATA(storeLineColumn) = bool;
++                TcldomDATA(storeLineColumn) = boolVal;
+             }
+             SetBooleanResult(TcldomDATA(storeLineColumn));
+             return TCL_OK;
+ 
+         case m_setNameCheck:
+             if (objc == 3) {
+-                if (Tcl_GetBooleanFromObj(interp, objv[2], &bool) != TCL_OK) {
++                if (Tcl_GetBooleanFromObj(interp, objv[2], &boolVal) != TCL_OK) {
+                     return TCL_ERROR;
+                 }
+-                TcldomDATA(dontCheckName) = !bool;
++                TcldomDATA(dontCheckName) = !boolVal;
+             }
+             SetBooleanResult(!TcldomDATA(dontCheckName));
+             return TCL_OK;
+             
+         case m_setTextCheck:
+             if (objc == 3) {
+-                if (Tcl_GetBooleanFromObj(interp, objv[2], &bool) != TCL_OK) {
++                if (Tcl_GetBooleanFromObj(interp, objv[2], &boolVal) != TCL_OK) {
+                     return TCL_ERROR;
+                 }
+-                TcldomDATA(dontCheckCharData) = !bool;
++                TcldomDATA(dontCheckCharData) = !boolVal;
+             }
+             SetBooleanResult(!TcldomDATA(dontCheckCharData));
+             return TCL_OK;
+             
+         case m_setObjectCommands:
+
+--- a/generic/tclexpat.c
++++ b/generic/tclexpat.c
+@@ -1265,11 +1265,11 @@
+   enum paramEntityParsingValues {
+       EXPAT_PARAMENTITYPARSINGALWAYS,
+       EXPAT_PARAMENTITYPARSINGNEVER,
+       EXPAT_PARAMENTITYPARSINGNOTSTANDALONE
+   };
+-  int optionIndex, value, bool;
++  int optionIndex, value, boolVal;
+   Tcl_Obj *const *objPtr = objv;
+   Tcl_CmdInfo cmdInfo;
+   int rc;
+   domLength len;
+   char *handlerSetName = NULL;
+@@ -1394,15 +1394,15 @@
+ #endif          
+           break;
+           
+       case EXPAT_FINAL:			/* -final */
+ 
+-	if (Tcl_GetBooleanFromObj(interp, objPtr[1], &bool) != TCL_OK) {
++	if (Tcl_GetBooleanFromObj(interp, objPtr[1], &boolVal) != TCL_OK) {
+             return TCL_ERROR;
+ 	}
+ 
+-        expat->final = bool;
++        expat->final = boolVal;
+ 	break;
+ 
+       case EXPAT_BASE:			/* -baseurl */
+ 
+         if (expat->baseURI) {
+@@ -1591,22 +1591,22 @@
+         }
+ 	break;
+ 
+       case EXPAT_USEFOREIGNDTD:                /* -useForeignDTD */
+         
+-        if (Tcl_GetBooleanFromObj (interp, objPtr[1], &bool) != TCL_OK) {
++        if (Tcl_GetBooleanFromObj (interp, objPtr[1], &boolVal) != TCL_OK) {
+             return TCL_ERROR;
+         }
+         if (expat->parser) {
+             /* Cannot be changed after parsing as started (which is
+                kind of understandable). */
+-            if (XML_UseForeignDTD (expat->parser, (unsigned char)bool)
++            if (XML_UseForeignDTD (expat->parser, (unsigned char)boolVal)
+                 != XML_ERROR_NONE) {
+-                expat->useForeignDTD = bool;
++                expat->useForeignDTD = boolVal;
+             }
+         } else {
+-            expat->useForeignDTD = bool;
++            expat->useForeignDTD = boolVal;
+         }
+         break;
+ 
+       case EXPAT_COMMENTCMD:      /* -commentcommand */
+ 	/* ericm@scriptics.com */
+@@ -1774,37 +1774,37 @@
+             }
+         }
+         break;
+ 
+     case EXPAT_NOEXPAND:
+-        if (Tcl_GetBooleanFromObj (interp, objPtr[1], &bool) != TCL_OK) {
++        if (Tcl_GetBooleanFromObj (interp, objPtr[1], &boolVal) != TCL_OK) {
+             return TCL_ERROR;
+         }
+-        if (bool) {
++        if (boolVal) {
+             XML_SetDefaultHandler( expat->parser,
+                                    TclGenExpatDefaultHandler);
+         } else {
+             XML_SetDefaultHandlerExpand( expat->parser,
+                                          TclGenExpatDefaultHandler);
+         }
+-        expat->noexpand = bool;
++        expat->noexpand = boolVal;
+         break;
+ 
+     case EXPAT_FASTCALL:
+-        if (Tcl_GetBooleanFromObj (interp, objPtr[1], &bool) != TCL_OK) {
++        if (Tcl_GetBooleanFromObj (interp, objPtr[1], &boolVal) != TCL_OK) {
+             return TCL_ERROR;
+         }
+         CheckDefaultTclHandlerSet;
+-        activeTclHandlerSet->fastCall = bool;
++        activeTclHandlerSet->fastCall = boolVal;
+         break;
+                   
+     case EXPAT_KEEPTEXTSTART:
+-        if (Tcl_GetBooleanFromObj(interp, objPtr[1], &bool) != TCL_OK) {
++        if (Tcl_GetBooleanFromObj(interp, objPtr[1], &boolVal) != TCL_OK) {
+             return TCL_ERROR;
+ 	}
+ 
+-        expat->keepTextStart = bool;
++        expat->keepTextStart = boolVal;
+ 	break;
+ 
+ #ifndef TDOM_NO_SCHEMA
+     case EXPAT_VALIDATECMD:
+         schemacmd = Tcl_GetString (objv[1]);
+
+
diff --git a/dev-tcltk/tdom/tdom-0.9.3.ebuild b/dev-tcltk/tdom/tdom-0.9.3.ebuild
index 1216aa4b8a64..b36da05c0662 100644
--- a/dev-tcltk/tdom/tdom-0.9.3.ebuild
+++ b/dev-tcltk/tdom/tdom-0.9.3.ebuild
@@ -1,4 +1,4 @@
-# Copyright 1999-2024 Gentoo Authors
+# Copyright 1999-2025 Gentoo Authors
 # Distributed under the terms of the GNU General Public License v2
 
 EAPI=8
@@ -29,7 +29,7 @@ PATCHES=(
 )
 
 QA_CONFIG_IMPL_DECL_SKIP=(
-	opendir64 rewinddir64 closedir64 stat64 # used to test for Large File Support
+	opendir64 readdir64 rewinddir64 closedir64 stat64 # used to test for Large File Support
 	arc4random_buf arc4random # used for BSD
 )
 
diff --git a/dev-tcltk/tdom/tdom-0.9.5.ebuild b/dev-tcltk/tdom/tdom-0.9.5.ebuild
index 6afb469b02ac..bf65fc2d502f 100644
--- a/dev-tcltk/tdom/tdom-0.9.5.ebuild
+++ b/dev-tcltk/tdom/tdom-0.9.5.ebuild
@@ -1,4 +1,4 @@
-# Copyright 1999-2024 Gentoo Authors
+# Copyright 1999-2025 Gentoo Authors
 # Distributed under the terms of the GNU General Public License v2
 
 EAPI=8
@@ -26,10 +26,11 @@ RDEPEND="${DEPEND}"
 PATCHES=(
 	"${FILESDIR}"/${PN}-0.9.4-useCC.patch
 	"${FILESDIR}"/${PN}-0.9.3-expat.patch
+	"${FILESDIR}"/${PN}-0.9.5-fix-c23.patch
 )
 
 QA_CONFIG_IMPL_DECL_SKIP=(
-	opendir64 rewinddir64 closedir64 stat64 # used to test for Large File Support
+	opendir64 readdir64 rewinddir64 closedir64 stat64 # used to test for Large File Support
 	arc4random_buf arc4random # used for BSD
 )