Factorial does not work in Sum and Table

[balthild]

In[27]:= Sum[Factorial[n], {n, 0, 3}]
(* The program hangs here, then press Ctrl-C. *)
^COut[27]= 106468 + 3*Factorial[$Aborted]

In[28]:= Table[Factorial[n], {n, 0, 3}]
(* Ctrl-C *)
^COut[28]= {1, 1, 1, 1, (* A lot of 1 here *), Factorial[$Aborted], Factorial[$Aborted], Factorial[$Aborted]}