Add %A/%a uppercase/lowercase string format specifiers (#2165)

test/asm/case-conversion.asm

@@ -0,0 +1,13 @@
+; ASCII
+assert STRUPR("camelCase") === "CAMELCASE"
+assert STRLWR("camelCase") === "camelcase"
+assert STRFMT("%s", "camelCase") === "camelCase"
+assert STRFMT("%A", "camelCase") === "CAMELCASE"
+assert STRFMT("%a", "camelCase") === "camelcase"
+
+; UTF-8
+assert STRUPR("ÇA a été ?") === "ÇA A éTé ?"
+assert STRLWR("ÇA a été ?") === "Ça a été ?"
+assert STRFMT("%s", "ÇA a été ?") === "ÇA a été ?"
+assert STRFMT("%A", "ÇA a été ?") === "ÇA A éTé ?"
+assert STRFMT("%a", "ÇA a été ?") === "Ça a été ?"

test/asm/string-formatting.asm

@@ -2,7 +2,7 @@ def n equ 300
 def m equ -42
 def f equ -123.0456
 def pi equ 3.14159
-def s equs "hello"
+def s equs "Hello!"
 def t equs "\"\\t\" is '\t'"
 def u equs "\t\r\0\n"
 
@@ -10,7 +10,8 @@ def u equs "\t\r\0\n"
 	println "<{u:m}> <{+3d:m}> <{#016o:m}>"
 	println "<{f:pi}> <{06.f:f}> <{.10f:f}>"
 	println "\"{#-20s:t}\", \"{#20s:t}\", \"{20s:t}\""
-	println "{#s:u}"
+	println "{s:s} {A:s} {a:s}"
+	println "{#s:u} {#A:u} {#a:u}"
 
 macro foo
 	println "\1 <{\1}>"

test/asm/string-formatting.out

@@ -2,5 +2,6 @@
 <4294967254> <-42> <&000037777777726>
 <3.14159> <-00123> <-123.0455932617>
 "\"\\t\" is '\t'     ", "     \"\\t\" is '\t'", "         "\t" is '	'"
-\t\r\0\n
+Hello! HELLO! hello!
+\t\r\0\n \t\r\0\n \t\r\0\n
 -6d:n <300   >