Vim - A port of Ruby's abbrev

abbrev.vim

"-----------------------------------------------------------------------------
" Abbrev

function! util#abbrev(words)
  let table = {}
  let seen = {}
  for word in a:words
    let abbrev = substitute(word, '.$', '', '')
    let ablen = strlen(abbrev)
    while ablen > 0
      if !has_key(seen, abbrev)
        let seen[abbrev] = 0
      endif
      let seen[abbrev] += 1
      if seen[abbrev] == 1
        let table[abbrev] = word
      elseif seen[abbrev] == 2
        unlet table[abbrev]
      else
        break
      endif
      let abbrev = substitute(abbrev, '.$', '', '')
      let ablen = strlen(abbrev)
    endwhile
  endfor
  for word in a:words
    let table[word] = word
  endfor
  return table
endfunction