Merge 8.6

Author: jan.nijtmans

doc/http.n

@@ -259,7 +259,7 @@ The default is \fButf-8\fR, as specified by RFC 2718.
 The value of the User-Agent header in the HTTP request.  In an unsafe
 interpreter, the default value depends upon the operating system, and
 the version numbers of \fBhttp\fR and \fBTcl\fR, and is (for example)
-.QW "\fBMozilla/5.0 (Windows; U; Windows NT 10.0) http/2.10.0 Tcl/9.0.0\fR" .
+.QW "\fBMozilla/5.0 (Windows; U; Windows NT 10.0) http/2.10.1 Tcl/9.0.0\fR" .
 A safe interpreter cannot determine its operating system, and so the default
 in a safe interpreter is to use a Windows 10 value with the current version
 numbers of \fBhttp\fR and \fBTcl\fR.

generic/tclTestObj.c

@@ -1090,6 +1090,26 @@ static const Tcl_ObjType v1TestListType = {
 };
 
 
+static
+void
+HugeUpdateString(
+    TCL_UNUSED(Tcl_Obj *))
+{
+    /* Always returns NULL, as an indication that
+     * room for its string representation cannot be allocated */
+	return;
+}
+
+static const Tcl_ObjType hugeType = {
+    "huge",			/* name */
+    NULL,			/* freeIntRepProc */
+    NULL,			/* dupIntRepProc */
+    HugeUpdateString,		/* updateStringProc */
+    NULL, 			/* setFromAnyProc */
+	TCL_OBJTYPE_V0
+};
+
+
 static int
 TestobjCmd(
     TCL_UNUSED(void *),
@@ -1104,14 +1124,14 @@ TestobjCmd(
     static const char *const subcommands[] = {
 	"freeallvars", "bug3598580", "buge58d7e19e9",
 	"types", "objtype", "newobj", "set",
-	"assign", "convert", "duplicate",
+	"assign", "convert", "duplicate", "huge",
 	"invalidateStringRep", "refcount", "type",
 	NULL
     };
     enum testobjCmdIndex {
 	TESTOBJ_FREEALLVARS, TESTOBJ_BUG3598580, TESTOBJ_BUGE58D7E19E9,
 	TESTOBJ_TYPES, TESTOBJ_OBJTYPE, TESTOBJ_NEWOBJ, TESTOBJ_SET,
-	TESTOBJ_ASSIGN, TESTOBJ_CONVERT, TESTOBJ_DUPLICATE,
+	TESTOBJ_ASSIGN, TESTOBJ_CONVERT, TESTOBJ_DUPLICATE, TESTOBJ_HUGE,
 	TESTOBJ_INVALIDATESTRINGREP, TESTOBJ_REFCOUNT, TESTOBJ_TYPE,
     } cmdIndex;
 
@@ -1208,7 +1228,17 @@ TestobjCmd(
 	}
 	SetVarToObj(varPtr, varIndex, objv[3]);
 	return TCL_OK;
-
+    case TESTOBJ_HUGE: {
+	    if (objc != 2) {
+		goto wrongNumArgs;
+	    }
+	    Tcl_Obj *hugeObjPtr = Tcl_NewObj();
+	    hugeObjPtr->typePtr = &hugeType;
+	    hugeObjPtr->length = INT_MAX - 1;
+	    hugeObjPtr->bytes = NULL;
+	    Tcl_SetObjResult(interp, hugeObjPtr);
+	}
+	return TCL_OK;
     default:
 	break;
     }

library/manifest.txt

@@ -4,7 +4,7 @@
 apply {{dir} {
   set isafe [interp issafe]
   foreach {safe package version file} {
-    0 http            2.10.0 {http http.tcl}
+    0 http            2.10.1 {http http.tcl}
     1 msgcat          1.7.1  {msgcat msgcat.tcl}
     1 opt             0.4.9  {opt optparse.tcl}
     0 cookiejar       0.2.0  {cookiejar cookiejar.tcl}