anarchy golf - packed UTF 9 で 1 byte 差で負けた件について
1 byte の差は、スタックトップにある数の下位 7 byte を出力する部分の
( )dup 0 3 index 127 and put print
と
( )dup 0 127 4 index and put print
の違い。
( )dup 0 3 index put print
というパターンに慣れすぎていたかな。0 と "n index" の間に 127 を入れるというのは盲点だった。この部分が縮むのかもとチラリとは思ったのだけど、127 まで考えが伸びなかった。
あとはまあ、readhexstring がこの問題の入力の読み込みに便利過ぎだった。これだけで 10 byte 以上縮んだ。