Improved compatibility with gawk --posix

This commit is contained in:
Luxferre
2024-01-18 12:09:06 +02:00
parent 4401ed7dde
commit 1434e6d3a2
+7 -7
View File
@@ -288,13 +288,13 @@ BEGIN { # main code part
} }
fc_deal = fc_lstate # save the deal number fc_deal = fc_lstate # save the deal number
asplit("A 2 3 4 5 6 7 8 9 T J Q K", cvals, " ") # card values asplit("A 2 3 4 5 6 7 8 9 T J Q K", cvals, " ") # card values
suits[0] = ASCII ? "c" : "\xe2\x99\xa3" # clubs suits[0] = ASCII ? "c" : "\342\231\243" # clubs
suits[1] = ASCII ? "d" : "\xe2\x99\xa6" # diamonds suits[1] = ASCII ? "d" : "\342\231\246" # diamonds
suits[2] = ASCII ? "h" : "\xe2\x99\xa5" # hearts suits[2] = ASCII ? "h" : "\342\231\245" # hearts
suits[3] = ASCII ? "s" : "\xe2\x99\xa0" # spades suits[3] = ASCII ? "s" : "\342\231\240" # spades
cstart[0] = MONOCHROME ? "" : "\x1b[31m" # red cstart[0] = MONOCHROME ? "" : "\033[31m" # red
cstart[1] = MONOCHROME ? "" : "\x1b[37m" # black (white) cstart[1] = MONOCHROME ? "" : "\033[37m" # black (white)
cend = MONOCHROME ? "" : "\x1b[39m" # reset color cend = MONOCHROME ? "" : "\033[39m" # reset color
split("", usedinds) # init used indices cache split("", usedinds) # init used indices cache
split("", cardstr) # init card strings array (exactly 3 char long each) split("", cardstr) # init card strings array (exactly 3 char long each)
for(i=0;i<52;i++) { # populate it for(i=0;i<52;i++) { # populate it