doASymbolicThing~SetAttributes~HoldAll
$defaultSymbolList = Thread@Hold[{x, y, z, a, b, c}];
doASymbolicThing[symbolicExpr_,
symbols1 : {__Symbol},
symbol2_Symbol
] :=
Replace[
Thread[
DeleteDuplicates@
Join[Thread[Hold[symbols1]], $defaultSymbolList, {Hold[symbol2]}],
Hold
],
Hold[symList : {__Symbol}] :>
Block[symList,
processSymbolicExprSafely[symbolicExpr, symList]
]
]