public static void mpfr_custom_move(
	mpfr_t x,
	void_ptr new_position
)

Public Shared Sub mpfr_custom_move ( 
	x As mpfr_t,
	new_position As void_ptr
)

public:
static void mpfr_custom_move(
	mpfr_t^ x, 
	void_ptr new_position
)

static member mpfr_custom_move : 
        x : mpfr_t * 
        new_position : void_ptr -> unit 

// Initialize a custom, 64-bit significand floating-point number, and set it to 0.
size_t size = mpfr_lib.mpfr_custom_get_size(64U);
void_ptr significand = gmp_lib.allocate(size);
gmp_lib.ZeroMemory(significand.ToIntPtr(), (int)size);
mpfr_t x = new mpfr_t();
mpfr_lib.mpfr_custom_init_set(x, mpfr_kind_t.MPFR_ZERO_KIND, 0, 64U, significand);

// Set x = 16.
Assert.IsTrue(mpfr_lib.mpfr_set_si(x, 16, mpfr_rnd_t.MPFR_RNDN) == 0);

// Assert the value of x.
Assert.IsTrue(x.ToString() == "0.160000000000000000000e2");

// Allocate new significand.
void_ptr significand2 = gmp_lib.allocate(8);
Marshal.Copy(new byte[] { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xc0 }, 0, significand2.ToIntPtr(), 8);

// Assign new significanf to x.
mpfr_lib.mpfr_custom_move(x, significand2);

// Assert the value of x.
Assert.IsTrue(x.ToString() == "0.240000000000000000000e2");

// Release unmanaged memory allocated for x and significand.
mpfr_lib.mpfr_custom_clear(x);
gmp_lib.free(significand);
gmp_lib.free(significand2);

' Initialize a custom, 64-bit significand floating-point number, and set it to 0.
Dim size As size_t = mpfr_lib.mpfr_custom_get_size(64U)
Dim significand As void_ptr = gmp_lib.allocate(size)
gmp_lib.ZeroMemory(significand.ToIntPtr(), CType(size, Integer))
Dim x As mpfr_t = New mpfr_t()
mpfr_lib.mpfr_custom_init_set(x, mpfr_kind_t.MPFR_ZERO_KIND, 0, 64U, significand)

' Set x = 16.
Assert.IsTrue(mpfr_lib.mpfr_set_si(x, 16, mpfr_rnd_t.MPFR_RNDN) = 0)

' Assert the value of x.
Assert.IsTrue(x.ToString() = "0.160000000000000000000e2")

' Allocate new significand.
Dim significand2 As void_ptr = gmp_lib.allocate(8)
Dim Byte() As Marshal.Copy(New { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xc0 }, 0, significand2.ToIntPtr(), 8)

' Assign new significanf to x.
mpfr_lib.mpfr_custom_move(x, significand2)

' Assert the value of x.
Assert.IsTrue(x.ToString() = "0.240000000000000000000e2")

' Release unmanaged memory allocated for x and significand.
mpfr_lib.mpfr_custom_clear(x)
gmp_lib.free(significand)
gmp_lib.free(significand2)

No code example is currently available or this language may not be supported.

No code example is currently available or this language may not be supported.