Free Software Foundation のソースは tabstop=8 で

vim 
function! DetectFSF()
  let i = 1
  let l = ""

  while i <= 10
    let l = l . getline(i)
    let i = i + 1
  endwhile 

  if l =~ "Copyright.*Free Software Foundation"
    set ts=8
    return
  endif
endfunction

Emacs の "-*-" にも対応したかったけど面倒なのでやめた。
"-*-" の機能のことはなんて呼ぶんだろう。
Vim では「モードライン」だけど。