long _ftol2(double d) { extern long _ftol(double d); return _ftol(d); }