Ordered words: Difference between revisions

Content added Content deleted
(→‎{{header|AppleScript}}: Minor modification to match change to recommended sort.)
Line 290:
if (thisWordLength ≥ longestWordLength) then
set theseCharacters to thisWord's characters
tell sorter to insertionSortsort(theseCharacters, 1, -1)
set sortedWord to theseCharacters as text
if (sortedWord = thisWord) then
Retrieved from "https://rosettacode.org/wiki/Ordered_words"