* ldexp.c (fold_unary): New. Split out from exp_fold_tree.