How to use InterpolatingFunction generated by Math

Question

Let us interpolate the same data using Mathematica 5.2, 7.0.1 and 8.0.1:

Interpolation[{{0, 0}, {1, 1}, {2, 3}, {3, 4}, {4, 3}, {5, 0}}] // InputForm

The outputs are:

Mathematica 5.2:

InterpolatingFunction[{{0, 5}}, 
 {2, 0, True, False, {3}, {0}}, {{0, 1, 2, 3, 4, 5}}, 
 {{0}, {1}, {3}, {4}, {3}, {0}}, {Automatic}]

Mathematica 7.0.1:

InterpolatingFunction[{{0, 5}}, {3, 1, 0, {6}, {4}, 0, 0, 0, 0}, 
 {{0, 1, 2, 3, 4, 5}}, {{0}, {1}, {3}, {4}, {3}, {0}}, {Automatic}]

Mathematica 8.0.1:

InterpolatingFunction[{{0, 5}}, {4, 3, 0, {6}, {4}, 0, 0, 0, 0, Automatic}, 
 {{0, 1, 2, 3, 4, 5}}, {{0}, {1}, {3}, {4}, {3}, {0}}, {Automatic}]

The output of Mathematica 5.2 still works when used as input in version 7.0.1 but not in version 8.0.1. It seems that support of the old-style InterpolatingFunction was dropped in version 8. Is it possible to reuse InterpolatingFunction data generated by Mathematica 5.2 in version 8.0.1?