Wordle comparison: Difference between revisions
Content added Content deleted
m (→{{header|Phix}}: I'm really not with it today...) |
m (→{{header|Quackery}}: tweak to code) |
||
Line 174: | Line 174: | ||
<lang Quackery> [ tuck witheach |
<lang Quackery> [ tuck witheach |
||
[ over i^ peek = if |
[ over i^ peek = if |
||
[ 2 rot i^ poke |
[ 2 rot i^ poke |
||
0 |
0 rot i^ poke ] ] |
||
witheach |
witheach |
||
[ over find |
[ over find |
||
Line 182: | Line 182: | ||
else drop ] |
else drop ] |
||
[] swap witheach |
[] swap witheach |
||
[ dup 3 < * join ] ] |
[ dup 3 < * join ] ] is wordle-compare ( $ $ --> [ ) |
||
$ "ALLOW" $ "LOLLY" wordle-compare echo cr |
$ "ALLOW" $ "LOLLY" wordle-compare echo cr |