Data update

Task/Show-ASCII-table/Langur/show-ascii-table.langur

@@ -1,7 +1,7 @@
-for .i of 16 {
-    for .j = 31 + .i ; .j < 128 ; .j += 16 {
-        val .L = switch(.j; 32: "spc"; 127: "del"; cp2s .j)
-        write $"\{.j:3} : \{.L:-4}"
+for i of 16 {
+    for j = 31 + i ; j < 128 ; j += 16 {
+        val L = switch(j; 32: "spc"; 127: "del"; cp2s(j))
+        write "{{j:3}} : {{L:-4}}"
     }
     writeln()
 }

Task/Show-ASCII-table/SETL/show-ascii-table.setl

@@ -0,0 +1,9 @@
+program ascii_table;
+    loop for i in [32..47] do
+        print(+/[lpad(str j, 3) + ' : ' + rpad(ascii j, 6) : j in [i, i+16..127]]);
+    end loop;
+
+    op ascii(n);
+        return {[32, 'Spc'], [127, 'Del']}(n) ? (char n);
+    end op;
+end program;