Soundex: Difference between revisions
→{{header|PureBasic}}: Before it returned wrong code in some words (e.g. Lloyd, Pfister)
(Soundex en FreeBASIC) |
(→{{header|PureBasic}}: Before it returned wrong code in some words (e.g. Lloyd, Pfister)) |
||
Line 4,012:
word = UCase(word)
code = Mid(word,1,1)
previous =
For i = 2 To (Len(word) + 1)
current = getCode(Mid(word, i, 1))
|