/* This function uses the same code as s_finite.S.  */