def quickEncode(tree: CodeTree)(text: List[Char]): List[Bit] = {
  	val table = convert(tree)
  	def code(text: List[Char]): List[Bit] = {
  		text match {
  			case c :: t => codeBits(table)(c) ++ code(t)
  			case _ => Nil
  		}
  	}
  	code(text)
  }