userland: add archive tools and pinned GoAWK, esbuild, and QuickJS

2026-11-07 10:56:29 +00:00
parent 7e7e49bfa2
commit d79b2bc2e1
1798 changed files with 562969 additions and 1 deletions
@@ -0,0 +1,89 @@
+# Date: Thu, 27 Apr 2006 20:59:03 +0100
+# From: Lee Haywood <ljhaywood2@googlemail.com>
+# Subject: gawk multi-byte support bugs, assertion bug and fix.
+# To: bug-gawk@gnu.org
+# Message-id: <60962be00604271259na0d8fdayb9d0c69a853216e8@mail.gmail.com>
+# MIME-version: 1.0
+# Content-type: multipart/alternative;
+#  boundary="----=_Part_10136_920879.1146167943492"
+# Status: RO
+# 
+# ------=_Part_10136_920879.1146167943492
+# Content-Type: text/plain; charset=ISO-8859-1
+# Content-Transfer-Encoding: quoted-printable
+# Content-Disposition: inline
+# 
+# 
+# Firstly, I have been getting the following error from version 3.1.5.
+# 
+#     awk: node.c:515: unref: Assertion `(tmp->flags & 4096) !=3D 0' failed.
+# 
+# In mk_number() in node.c the MBS_SUPPORT code is inside the GAWKDEBUG
+# section - moving it outside explicitly clears the string values, which
+# prevents the assertion error from occurring.  The corrected version is
+# shown at the end of this message.
+# 
+# As an aside, I also noticed that n->wstptr is not cleared by
+# set_field() and set_record() in field.c when the flags are set to
+# exclude WSTRCUR.  However, I do not have a test case to show if
+# changing them makes any difference.
+# 
+# A second problem also occurs when gawk 3.1.5 is compiled with
+# multi-byte character support (MBS_SUPPORT).  The following code should
+# change the index of the substring "bc" from 2 to 3, but it gets
+# reported as 2 in both cases - which is obviously disastrous.
+# 
+#     awk 'BEGIN {
+#             Value =3D "abc"
+# 
+#             print "Before <" Value "> ",
+#                   index( Value, "bc" )
+# 
+#             sub( /bc/, "bbc", Value )
+# 
+#             print "After  <" Value ">",
+#                   index( Value, "bc" )
+#         }'
+# 
+# Compiling with MBS_SUPPORT undefined makes these problems go away.
+# 
+# /* mk_number --- allocate a node with defined number */
+# 
+# NODE *
+# mk_number(AWKNUM x, unsigned int flags)
+# {
+#         register NODE *r;
+# 
+#         getnode(r);
+#         r->type =3D Node_val;
+#         r->numbr =3D x;
+#         r->flags =3D flags;
+# #if defined MBS_SUPPORT
+#         r->wstptr =3D NULL;
+#         r->wstlen =3D 0;
+# #endif /* MBS_SUPPORT */
+# #ifdef GAWKDEBUG
+#         r->stref =3D 1;
+#         r->stptr =3D NULL;
+#         r->stlen =3D 0;
+# #if defined MBS_SUPPORT
+#         r->flags &=3D ~WSTRCUR;
+# #endif /* MBS_SUPPORT */
+# #endif /* GAWKDEBUG */
+#         return r;
+# }
+# 
+# Thanks.
+# 
+# --
+# Lee Haywood.
+
+BEGIN {
+	Value = "abc"
+
+	print "Before <" Value "> ", index( Value, "bc" )
+ 
+	sub( /bc/, "bbc", Value )
+
+	print "After  <" Value ">", index( Value, "bc" )
+}