Source position: gmp.pas line 796
function mpn_perfect_square_p(
s1p: mpn_ptr;
n: mp_size_t
):LongInt;