Little bit fix for vfp :p