Method code for $trie.match_exact()

[Turn off line numbering]

---

  1: arg trie, key;
  2: var n, t;
  3: 
  4: if (trie[1] && key == trie[1][1])
  5:     return trie[1];
  6: if (!key || !(n = key[1] in trie[2]))
  7:     throw(~keynf, "Trie: key not found.");
  8: (> (t = .match_exact(trie[n + 2], key.subrange(2))) <);
  9: t = t.replace(1, key[1] + t[1]);
 10: return t;

---

["// Miroslav Silovic ", "// Created 09-May-1995 as a part of ColdCore, see: @help Credit"]