let get_kind name =
    let l = String.length name in
    if l >= 6 then
      if String.sub name 0 6 = "local:" then (
        (`local, String.sub name 6 (l - 6))
      ) else
        (`generic, name)
    else 
      (`generic, name)