Soundex: Difference between revisions

Content added Content deleted
Line 2,394: Line 2,394:
end
end
ret = "$(uppercase(s[1]))"
ret = "$(uppercase(s[1]))"
lastletter = 'W'
lastletter = '0'
lastletternum = haskey(char2num, ret[1]) ? char2num[ret[1]] : ""
lastletternum = haskey(char2num, ret[1]) ? char2num[ret[1]] : ""
for c in s[2:end]
for c in s[2:end]
Line 2,400: Line 2,400:
if haskey(char2num, c)
if haskey(char2num, c)
letternum = char2num[c]
letternum = char2num[c]
if letternum != lastletternum || !(lastletter in ('H', 'W'))
if letternum != lastletternum || (!(lastletter in ('H', 'W')) && length(ret) > 1)
ret = "$ret$letternum"
ret = "$ret$letternum"
lastletternum = letternum
lastletternum = letternum
Line 2,416: Line 2,416:
end
end


const names = "Soundex Example Ascroft Ashcraftman Sownteks Ekzampul O'Hara Gauss Lloyd Lukasiewicz"
const names = "Ashcroft Noah Ashcraft Liam Mason Jacob William LLoyd Ethan James"


for name in split(names)
for name in split(names)