Determine if a string has all unique characters: Difference between revisions

Content added Content deleted
(Added Quackery.)
Line 3,526: Line 3,526:
<syntaxhighlight lang="Quackery"> [ over find swap found ] is has ( $ c --> b )
<syntaxhighlight lang="Quackery"> [ over find swap found ] is has ( $ c --> b )


[ dip
[ dip [ 0 0 true ]
[ 0 0 true ]
dup size 2 < iff
dup size 2 < iff
drop done
drop done