Compare performance of searching for all //SYMBOL_PACKAGE to current vectorized approach in unused_import_linter()

[MichaelChirico]

lintr/R/unused_import_linter.R

Lines 114 to 121 in 72eeefd

	is_ns_used <- vapply(
	imported_pkgs,
	function(pkg) {
	ns_usage <- xml_find_first(xml, paste0("//SYMBOL_PACKAGE[text() = '", pkg, "']"))
	!identical(ns_usage, xml2::xml_missing())
	},
	logical(1L)
	)

This runs //SYMBOL_PACKAGE many times; it's almost certainly better to refactor this to run //SYMBOL_PACKAGE once instead.