Playing cards: Difference between revisions
Content added Content deleted
(added BASIC) |
(fix swap in m4) |
||
| Line 1,228: | Line 1,228: | ||
define(`show', |
define(`show', |
||
`for(`x',1,defn($1[size]),`defn($1[x])ifelse(x,defn($1[size]),`',`, ')')')dnl |
`for(`x',1,defn($1[size]),`defn($1[x])ifelse(x,defn($1[size]),`',`, ')')')dnl |
||
define(`swap',`define($1[$2],defn($1[$4]))define($1[4],$3)')dnl |
define(`swap',`define($1[$2],defn($1[$4]))define($1[$4],$3)')dnl |
||
define(`shuffle', |
define(`shuffle', |
||
`for(`x',1,defn($1[size]), |
`for(`x',1,defn($1[size]), |
||