userland: add archive tools and pinned GoAWK, esbuild, and QuickJS
This commit is contained in:
@@ -0,0 +1,30 @@
|
||||
# Tests due to John Haque, May 2011
|
||||
#
|
||||
# The following should be fatal; can't catch them inside awk, though
|
||||
# $> echo 'a' | ./gawk '/[z-a]/ { print }'
|
||||
# $> echo 'A' | ./gawk '/[+-[:digit:]]/'
|
||||
|
||||
BEGIN {
|
||||
char[1] = "."
|
||||
pat[1] = "[--\\/]"
|
||||
|
||||
char[2] = "a"
|
||||
pat[2] = "[]-c]"
|
||||
|
||||
char[3] = "c"
|
||||
pat[3] = "[[a-d]"
|
||||
|
||||
char[4] = "\\"
|
||||
pat[4] = "[\\[-\\]]"
|
||||
|
||||
char[5] = "[.c.]"
|
||||
pat[5] = "[a-[.e.]]"
|
||||
|
||||
char[6] = "[.d.]"
|
||||
pat[6] = "[[.c.]-[.z.]]"
|
||||
|
||||
for (i = 1; i in char; i++) {
|
||||
printf("\"%s\" ~ /%s/ --> %d\n", char[i], pat[i],
|
||||
char[i] ~ pat[i])
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user