Ok, whatever glitch happened with Timing, it is gone :-/ but I am still unable to use it in my program. See, what I attempt to do:
SetAttributes[MyTime, HoldAll];
MyTime[expression_, prefix_: "expression"] :=
Block[{text = "Time for " <> prefix <> " is "}, Print["Starting"];
Block[{aux2 = Timing[Evaluate[expression]]}, Print["Finished"];
Print[text <> ToString[ aux2[[1]]*1000] <> "ms"]; aux2[[2]]]];
This always prints zero, no matter how long the computation in "expression" takes. Using AbsoluteTiming also does not work.