Home
last modified time | relevance | path

Searched refs:Fraction_1 (Results 1 – 25 of 25) sorted by relevance

/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/libgnat/
H A Ds-stratt__xdr.adb631 Fraction_1 : Long_Long_Unsigned := 0; variable
648 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
656 Result := Long_Long_Float (Fraction_1) + Result;
682 if Fraction_1 = 0 and then Fraction_2 = 0 then
1434 Fraction_1 : Long_Long_Unsigned; variable
1458 Fraction_1 := 0;
1478 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1479 F := F - Long_Long_Float (Fraction_1);
1487 S (I) := SE (Fraction_1 mod BB);
1488 Fraction_1 := Fraction_1 / BB;
/dports/lang/gcc9/gcc-9.4.0/gcc/ada/libgnat/
H A Ds-stratt__xdr.adb631 Fraction_1 : Long_Long_Unsigned := 0; variable
648 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
656 Result := Long_Long_Float (Fraction_1) + Result;
682 if Fraction_1 = 0 and then Fraction_2 = 0 then
1434 Fraction_1 : Long_Long_Unsigned; variable
1458 Fraction_1 := 0;
1478 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1479 F := F - Long_Long_Float (Fraction_1);
1487 S (I) := SE (Fraction_1 mod BB);
1488 Fraction_1 := Fraction_1 / BB;
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/ada/libgnat/
H A Ds-stratt__xdr.adb631 Fraction_1 : Long_Long_Unsigned := 0; variable
648 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
656 Result := Long_Long_Float (Fraction_1) + Result;
682 if Fraction_1 = 0 and then Fraction_2 = 0 then
1434 Fraction_1 : Long_Long_Unsigned; variable
1458 Fraction_1 := 0;
1478 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1479 F := F - Long_Long_Float (Fraction_1);
1487 S (I) := SE (Fraction_1 mod BB);
1488 Fraction_1 := Fraction_1 / BB;
/dports/lang/gnat_util/gcc-6-20180516/gcc/ada/
H A Ds-stratt-xdr.adb626 Fraction_1 : Long_Long_Unsigned := 0; variable
643 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
651 Result := Long_Long_Float (Fraction_1) + Result;
677 if Fraction_1 = 0 and then Fraction_2 = 0 then
1429 Fraction_1 : Long_Long_Unsigned; variable
1453 Fraction_1 := 0;
1473 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1474 F := F - Long_Long_Float (Fraction_1);
1482 S (I) := SE (Fraction_1 mod BB);
1483 Fraction_1 := Fraction_1 / BB;
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/ada/libgnat/
H A Ds-stratt__xdr.adb631 Fraction_1 : Long_Long_Unsigned := 0; variable
648 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
656 Result := Long_Long_Float (Fraction_1) + Result;
682 if Fraction_1 = 0 and then Fraction_2 = 0 then
1434 Fraction_1 : Long_Long_Unsigned; variable
1458 Fraction_1 := 0;
1478 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1479 F := F - Long_Long_Float (Fraction_1);
1487 S (I) := SE (Fraction_1 mod BB);
1488 Fraction_1 := Fraction_1 / BB;
/dports/lang/gcc48/gcc-4.8.5/gcc/ada/
H A Ds-stratt-xdr.adb622 Fraction_1 : Long_Long_Unsigned := 0; variable
639 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
647 Result := Long_Long_Float (Fraction_1) + Result;
673 if Fraction_1 = 0 and then Fraction_2 = 0 then
1425 Fraction_1 : Long_Long_Unsigned; variable
1449 Fraction_1 := 0;
1469 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1470 F := F - Long_Long_Float (Fraction_1);
1478 S (I) := SE (Fraction_1 mod BB);
1479 Fraction_1 := Fraction_1 / BB;
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/libgnat/
H A Ds-stratt__xdr.adb631 Fraction_1 : Long_Long_Unsigned := 0; variable
648 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
656 Result := Long_Long_Float (Fraction_1) + Result;
682 if Fraction_1 = 0 and then Fraction_2 = 0 then
1434 Fraction_1 : Long_Long_Unsigned; variable
1458 Fraction_1 := 0;
1478 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1479 F := F - Long_Long_Float (Fraction_1);
1487 S (I) := SE (Fraction_1 mod BB);
1488 Fraction_1 := Fraction_1 / BB;
/dports/devel/mingw32-gcc/gcc-4.8.1/gcc/ada/
H A Ds-stratt-xdr.adb622 Fraction_1 : Long_Long_Unsigned := 0; variable
639 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
647 Result := Long_Long_Float (Fraction_1) + Result;
673 if Fraction_1 = 0 and then Fraction_2 = 0 then
1425 Fraction_1 : Long_Long_Unsigned; variable
1449 Fraction_1 := 0;
1469 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1470 F := F - Long_Long_Float (Fraction_1);
1478 S (I) := SE (Fraction_1 mod BB);
1479 Fraction_1 := Fraction_1 / BB;
/dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/ada/libgnat/
H A Ds-stratt__xdr.adb631 Fraction_1 : Long_Long_Unsigned := 0; variable
648 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
656 Result := Long_Long_Float (Fraction_1) + Result;
682 if Fraction_1 = 0 and then Fraction_2 = 0 then
1434 Fraction_1 : Long_Long_Unsigned; variable
1458 Fraction_1 := 0;
1478 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1479 F := F - Long_Long_Float (Fraction_1);
1487 S (I) := SE (Fraction_1 mod BB);
1488 Fraction_1 := Fraction_1 / BB;
/dports/devel/zpu-gcc/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/
H A Ds-strxdr.adb606 Fraction_1 : Long_Long_Unsigned := 0; variable
623 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
631 Result := Long_Long_Float (Fraction_1) + Result;
657 if Fraction_1 = 0 and then Fraction_2 = 0 then
1379 Fraction_1 : Long_Long_Unsigned; variable
1402 Fraction_1 := 0;
1422 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1423 F := Long_Long_Float (F - Long_Long_Float (Fraction_1));
1431 S (I) := SE (Fraction_1 mod BB);
1432 Fraction_1 := Fraction_1 / BB;
/dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/ada/
H A Ds-stratt-xdr.adb626 Fraction_1 : Long_Long_Unsigned := 0; variable
643 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
651 Result := Long_Long_Float (Fraction_1) + Result;
677 if Fraction_1 = 0 and then Fraction_2 = 0 then
1429 Fraction_1 : Long_Long_Unsigned; variable
1453 Fraction_1 := 0;
1473 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1474 F := F - Long_Long_Float (Fraction_1);
1482 S (I) := SE (Fraction_1 mod BB);
1483 Fraction_1 := Fraction_1 / BB;
/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/ada/libgnat/
H A Ds-stratt__xdr.adb631 Fraction_1 : Long_Long_Unsigned := 0; variable
648 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
656 Result := Long_Long_Float (Fraction_1) + Result;
682 if Fraction_1 = 0 and then Fraction_2 = 0 then
1434 Fraction_1 : Long_Long_Unsigned; variable
1458 Fraction_1 := 0;
1478 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1479 F := F - Long_Long_Float (Fraction_1);
1487 S (I) := SE (Fraction_1 mod BB);
1488 Fraction_1 := Fraction_1 / BB;
/dports/devel/avr-gcc/gcc-10.2.0/gcc/ada/libgnat/
H A Ds-stratt__xdr.adb631 Fraction_1 : Long_Long_Unsigned := 0; variable
648 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
656 Result := Long_Long_Float (Fraction_1) + Result;
682 if Fraction_1 = 0 and then Fraction_2 = 0 then
1434 Fraction_1 : Long_Long_Unsigned; variable
1458 Fraction_1 := 0;
1478 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1479 F := F - Long_Long_Float (Fraction_1);
1487 S (I) := SE (Fraction_1 mod BB);
1488 Fraction_1 := Fraction_1 / BB;
/dports/lang/gcc10/gcc-10.3.0/gcc/ada/libgnat/
H A Ds-stratt__xdr.adb631 Fraction_1 : Long_Long_Unsigned := 0; variable
648 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
656 Result := Long_Long_Float (Fraction_1) + Result;
682 if Fraction_1 = 0 and then Fraction_2 = 0 then
1434 Fraction_1 : Long_Long_Unsigned; variable
1458 Fraction_1 := 0;
1478 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1479 F := F - Long_Long_Float (Fraction_1);
1487 S (I) := SE (Fraction_1 mod BB);
1488 Fraction_1 := Fraction_1 / BB;
/dports/lang/gcc8/gcc-8.5.0/gcc/ada/libgnat/
H A Ds-stratt__xdr.adb631 Fraction_1 : Long_Long_Unsigned := 0; variable
648 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
656 Result := Long_Long_Float (Fraction_1) + Result;
682 if Fraction_1 = 0 and then Fraction_2 = 0 then
1434 Fraction_1 : Long_Long_Unsigned; variable
1458 Fraction_1 := 0;
1478 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1479 F := F - Long_Long_Float (Fraction_1);
1487 S (I) := SE (Fraction_1 mod BB);
1488 Fraction_1 := Fraction_1 / BB;
/dports/devel/zpu-binutils/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/
H A Ds-strxdr.adb606 Fraction_1 : Long_Long_Unsigned := 0;
623 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
631 Result := Long_Long_Float (Fraction_1) + Result;
657 if Fraction_1 = 0 and then Fraction_2 = 0 then
1379 Fraction_1 : Long_Long_Unsigned;
1402 Fraction_1 := 0;
1422 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1423 F := Long_Long_Float (F - Long_Long_Float (Fraction_1));
1431 S (I) := SE (Fraction_1 mod BB);
1432 Fraction_1 := Fraction_1 / BB;
/dports/lang/gcc9-aux/bootstrap/lib/gcc/x86_64-aux-dragonfly5.5/9.1.0/adainclude/
H A Ds-stratt__xdr.adb631 Fraction_1 : Long_Long_Unsigned := 0; variable
648 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
656 Result := Long_Long_Float (Fraction_1) + Result;
682 if Fraction_1 = 0 and then Fraction_2 = 0 then
1434 Fraction_1 : Long_Long_Unsigned; variable
1458 Fraction_1 := 0;
1478 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1479 F := F - Long_Long_Float (Fraction_1);
1487 S (I) := SE (Fraction_1 mod BB);
1488 Fraction_1 := Fraction_1 / BB;
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/ada/libgnat/
H A Ds-stratt__xdr.adb631 Fraction_1 : Long_Long_Unsigned := 0; variable
648 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
656 Result := Long_Long_Float (Fraction_1) + Result;
682 if Fraction_1 = 0 and then Fraction_2 = 0 then
1434 Fraction_1 : Long_Long_Unsigned; variable
1458 Fraction_1 := 0;
1478 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1479 F := F - Long_Long_Float (Fraction_1);
1487 S (I) := SE (Fraction_1 mod BB);
1488 Fraction_1 := Fraction_1 / BB;
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/ada/libgnat/
H A Ds-stratt__xdr.adb631 Fraction_1 : Long_Long_Unsigned := 0; variable
648 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
656 Result := Long_Long_Float (Fraction_1) + Result;
682 if Fraction_1 = 0 and then Fraction_2 = 0 then
1434 Fraction_1 : Long_Long_Unsigned; variable
1458 Fraction_1 := 0;
1478 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1479 F := F - Long_Long_Float (Fraction_1);
1487 S (I) := SE (Fraction_1 mod BB);
1488 Fraction_1 := Fraction_1 / BB;
/dports/lang/gcc6-aux/bootstrap/lib/gcc/x86_64-aux-dragonfly4.1/5.1.0/adainclude/
H A Ds-stratt-xdr.adb626 Fraction_1 : Long_Long_Unsigned := 0; variable
643 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
651 Result := Long_Long_Float (Fraction_1) + Result;
677 if Fraction_1 = 0 and then Fraction_2 = 0 then
1429 Fraction_1 : Long_Long_Unsigned; variable
1453 Fraction_1 := 0;
1473 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1474 F := F - Long_Long_Float (Fraction_1);
1482 S (I) := SE (Fraction_1 mod BB);
1483 Fraction_1 := Fraction_1 / BB;
/dports/lang/gcc6-aux/gcc-6-20180516/gcc/ada/
H A Ds-stratt-xdr.adb626 Fraction_1 : Long_Long_Unsigned := 0; variable
643 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
651 Result := Long_Long_Float (Fraction_1) + Result;
677 if Fraction_1 = 0 and then Fraction_2 = 0 then
1429 Fraction_1 : Long_Long_Unsigned; variable
1453 Fraction_1 := 0;
1473 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1474 F := F - Long_Long_Float (Fraction_1);
1482 S (I) := SE (Fraction_1 mod BB);
1483 Fraction_1 := Fraction_1 / BB;
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/libgnat/
H A Ds-statxd.adb655 Fraction_1 : Long_Long_Unsigned := 0; variable
672 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
680 Result := Long_Long_Float (Fraction_1) + Result;
706 if Fraction_1 = 0 and then Fraction_2 = 0 then
1517 Fraction_1 : Long_Long_Unsigned; variable
1541 Fraction_1 := 0;
1561 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1562 F := F - Long_Long_Float (Fraction_1);
1570 S (I) := SE (Fraction_1 mod BB);
1571 Fraction_1 := Fraction_1 / BB;
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/libgnat/
H A Ds-statxd.adb655 Fraction_1 : Long_Long_Unsigned := 0; variable
672 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
680 Result := Long_Long_Float (Fraction_1) + Result;
706 if Fraction_1 = 0 and then Fraction_2 = 0 then
1517 Fraction_1 : Long_Long_Unsigned; variable
1541 Fraction_1 := 0;
1561 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1562 F := F - Long_Long_Float (Fraction_1);
1570 S (I) := SE (Fraction_1 mod BB);
1571 Fraction_1 := Fraction_1 / BB;
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/ada/libgnat/
H A Ds-statxd.adb655 Fraction_1 : Long_Long_Unsigned := 0; variable
672 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
680 Result := Long_Long_Float (Fraction_1) + Result;
706 if Fraction_1 = 0 and then Fraction_2 = 0 then
1517 Fraction_1 : Long_Long_Unsigned; variable
1541 Fraction_1 := 0;
1561 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1562 F := F - Long_Long_Float (Fraction_1);
1570 S (I) := SE (Fraction_1 mod BB);
1571 Fraction_1 := Fraction_1 / BB;
/dports/lang/gcc11/gcc-11.2.0/gcc/ada/libgnat/
H A Ds-statxd.adb655 Fraction_1 : Long_Long_Unsigned := 0; variable
672 Fraction_1 := Fraction_1 * BB + Long_Long_Unsigned (S (I));
680 Result := Long_Long_Float (Fraction_1) + Result;
706 if Fraction_1 = 0 and then Fraction_2 = 0 then
1517 Fraction_1 : Long_Long_Unsigned; variable
1541 Fraction_1 := 0;
1561 Fraction_1 := Long_Long_Unsigned (Long_Long_Float'Floor (F));
1562 F := F - Long_Long_Float (Fraction_1);
1570 S (I) := SE (Fraction_1 mod BB);
1571 Fraction_1 := Fraction_1 / BB;