/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/libgnat/ |
H A D | s-genbig.adb | 241 To_Bignum (Q).Neg := To_Bignum (Q).Len > 0 and then (X.Neg xor Y.Neg); 277 Big_Mul (To_Bignum (XY2), To_Bignum (XY2)); 554 if To_Bignum (R).Len = 0 then 563 To_Bignum (T1).Neg := Y.Neg; 658 To_Bignum (R).Neg := To_Bignum (R).Len > 0 and then X.Neg; 757 Quotient := To_Bignum (A / B); 1189 end To_Bignum; 1194 end To_Bignum; 1228 end To_Bignum; 1232 return To_Bignum (Unsigned_128 (X)); [all …]
|
H A D | s-genbig.ads | 49 with function To_Bignum formal 100 function To_Bignum (X : Long_Long_Integer) return Big_Integer; subprogspec 104 function To_Bignum (X : Long_Long_Long_Integer) return Big_Integer; subprogspec 108 function To_Bignum (X : Interfaces.Unsigned_64) return Big_Integer; subprogspec 112 function To_Bignum (X : Interfaces.Unsigned_128) return Big_Integer; subprogspec
|
H A D | a-nbnbin.adb | 48 function To_Bignum (X : aliased in out Bignum) return Bignum is (X); subprogram 71 (Bignum, Allocate_Bignum, Free_Bignum, To_Bignum); 78 else To_Bignum (Arg.Value.C)); 154 Set_Bignum (Result, To_Bignum (Long_Long_Integer (Arg))); 180 Set_Bignum (Result, To_Bignum (Long_Long_Long_Integer (Arg))); 208 Set_Bignum (Result, To_Bignum (Unsigned_128 (Arg))); 283 Set_Bignum (Result, To_Bignum (Long_Long_Long_Integer'Value (Arg))); 550 Exp : Bignum := To_Bignum (Long_Long_Integer (R)); 607 This.C := To_Address (new Bignum_Data'(To_Bignum (This.C).all)); 616 Tmp : Bignum := To_Bignum (This.C);
|
H A D | s-bignum.adb | 46 function To_Bignum (X : aliased in out Bignum) return Bignum is (X); subprogram 98 (Bignum, Allocate_Bignum, Free_Bignum, To_Bignum); 143 function To_Bignum (X : Long_Long_Integer) return Bignum subprogram 144 renames Sec_Stack_Bignums.To_Bignum;
|
H A D | s-bignum.ads | 72 function To_Bignum (X : Long_Long_Integer) return Bignum; subprogspec 98 pragma Inline (To_Bignum);
|
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/libgnat/ |
H A D | s-genbig.adb | 241 To_Bignum (Q).Neg := To_Bignum (Q).Len > 0 and then (X.Neg xor Y.Neg); 277 Big_Mul (To_Bignum (XY2), To_Bignum (XY2)); 554 if To_Bignum (R).Len = 0 then 563 To_Bignum (T1).Neg := Y.Neg; 658 To_Bignum (R).Neg := To_Bignum (R).Len > 0 and then X.Neg; 757 Quotient := To_Bignum (A / B); 1189 end To_Bignum; 1194 end To_Bignum; 1228 end To_Bignum; 1232 return To_Bignum (Unsigned_128 (X)); [all …]
|
H A D | s-genbig.ads | 49 with function To_Bignum formal 100 function To_Bignum (X : Long_Long_Integer) return Big_Integer; subprogspec 104 function To_Bignum (X : Long_Long_Long_Integer) return Big_Integer; subprogspec 108 function To_Bignum (X : Interfaces.Unsigned_64) return Big_Integer; subprogspec 112 function To_Bignum (X : Interfaces.Unsigned_128) return Big_Integer; subprogspec
|
H A D | a-nbnbin.adb | 47 function To_Bignum (X : aliased in out Bignum) return Bignum is (X); subprogram 70 (Bignum, Allocate_Bignum, Free_Bignum, To_Bignum); 77 else To_Bignum (Arg.Value.C)); 153 Set_Bignum (Result, To_Bignum (Long_Long_Integer (Arg))); 179 Set_Bignum (Result, To_Bignum (Long_Long_Long_Integer (Arg))); 207 Set_Bignum (Result, To_Bignum (Unsigned_128 (Arg))); 282 Set_Bignum (Result, To_Bignum (Long_Long_Long_Integer'Value (Arg))); 549 Exp : Bignum := To_Bignum (Long_Long_Integer (R)); 606 This.C := To_Address (new Bignum_Data'(To_Bignum (This.C).all)); 615 Tmp : Bignum := To_Bignum (This.C);
|
H A D | s-bignum.adb | 46 function To_Bignum (X : aliased in out Bignum) return Bignum is (X); subprogram 98 (Bignum, Allocate_Bignum, Free_Bignum, To_Bignum); 143 function To_Bignum (X : Long_Long_Integer) return Bignum subprogram 144 renames Sec_Stack_Bignums.To_Bignum;
|
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/ada/libgnat/ |
H A D | s-genbig.adb | 241 To_Bignum (Q).Neg := To_Bignum (Q).Len > 0 and then (X.Neg xor Y.Neg); 277 Big_Mul (To_Bignum (XY2), To_Bignum (XY2)); 554 if To_Bignum (R).Len = 0 then 563 To_Bignum (T1).Neg := Y.Neg; 658 To_Bignum (R).Neg := To_Bignum (R).Len > 0 and then X.Neg; 757 Quotient := To_Bignum (A / B); 1189 end To_Bignum; 1194 end To_Bignum; 1228 end To_Bignum; 1232 return To_Bignum (Unsigned_128 (X)); [all …]
|
H A D | s-genbig.ads | 49 with function To_Bignum formal 100 function To_Bignum (X : Long_Long_Integer) return Big_Integer; subprogspec 104 function To_Bignum (X : Long_Long_Long_Integer) return Big_Integer; subprogspec 108 function To_Bignum (X : Interfaces.Unsigned_64) return Big_Integer; subprogspec 112 function To_Bignum (X : Interfaces.Unsigned_128) return Big_Integer; subprogspec
|
H A D | a-nbnbin.adb | 48 function To_Bignum (X : aliased in out Bignum) return Bignum is (X); subprogram 71 (Bignum, Allocate_Bignum, Free_Bignum, To_Bignum); 78 else To_Bignum (Arg.Value.C)); 154 Set_Bignum (Result, To_Bignum (Long_Long_Integer (Arg))); 180 Set_Bignum (Result, To_Bignum (Long_Long_Long_Integer (Arg))); 208 Set_Bignum (Result, To_Bignum (Unsigned_128 (Arg))); 283 Set_Bignum (Result, To_Bignum (Long_Long_Long_Integer'Value (Arg))); 550 Exp : Bignum := To_Bignum (Long_Long_Integer (R)); 607 This.C := To_Address (new Bignum_Data'(To_Bignum (This.C).all)); 616 Tmp : Bignum := To_Bignum (This.C);
|
H A D | s-bignum.adb | 46 function To_Bignum (X : aliased in out Bignum) return Bignum is (X); subprogram 98 (Bignum, Allocate_Bignum, Free_Bignum, To_Bignum); 143 function To_Bignum (X : Long_Long_Integer) return Bignum subprogram 144 renames Sec_Stack_Bignums.To_Bignum;
|
/dports/lang/gcc11/gcc-11.2.0/gcc/ada/libgnat/ |
H A D | s-genbig.adb | 241 To_Bignum (Q).Neg := To_Bignum (Q).Len > 0 and then (X.Neg xor Y.Neg); 277 Big_Mul (To_Bignum (XY2), To_Bignum (XY2)); 554 if To_Bignum (R).Len = 0 then 563 To_Bignum (T1).Neg := Y.Neg; 658 To_Bignum (R).Neg := To_Bignum (R).Len > 0 and then X.Neg; 757 Quotient := To_Bignum (A / B); 1189 end To_Bignum; 1194 end To_Bignum; 1228 end To_Bignum; 1232 return To_Bignum (Unsigned_128 (X)); [all …]
|
H A D | s-genbig.ads | 49 with function To_Bignum formal 100 function To_Bignum (X : Long_Long_Integer) return Big_Integer; subprogspec 104 function To_Bignum (X : Long_Long_Long_Integer) return Big_Integer; subprogspec 108 function To_Bignum (X : Interfaces.Unsigned_64) return Big_Integer; subprogspec 112 function To_Bignum (X : Interfaces.Unsigned_128) return Big_Integer; subprogspec
|
H A D | a-nbnbin.adb | 48 function To_Bignum (X : aliased in out Bignum) return Bignum is (X); subprogram 71 (Bignum, Allocate_Bignum, Free_Bignum, To_Bignum); 78 else To_Bignum (Arg.Value.C)); 154 Set_Bignum (Result, To_Bignum (Long_Long_Integer (Arg))); 180 Set_Bignum (Result, To_Bignum (Long_Long_Long_Integer (Arg))); 208 Set_Bignum (Result, To_Bignum (Unsigned_128 (Arg))); 283 Set_Bignum (Result, To_Bignum (Long_Long_Long_Integer'Value (Arg))); 550 Exp : Bignum := To_Bignum (Long_Long_Integer (R)); 607 This.C := To_Address (new Bignum_Data'(To_Bignum (This.C).all)); 616 Tmp : Bignum := To_Bignum (This.C);
|
H A D | s-bignum.adb | 46 function To_Bignum (X : aliased in out Bignum) return Bignum is (X); 98 (Bignum, Allocate_Bignum, Free_Bignum, To_Bignum); 143 function To_Bignum (X : Long_Long_Integer) return Bignum 144 renames Sec_Stack_Bignums.To_Bignum;
|
/dports/devel/avr-gcc/gcc-10.2.0/gcc/ada/libgnat/ |
H A D | a-nbnbin.adb | 50 else To_Bignum (Arg.Value.C)); 126 Set_Bignum (Result, To_Bignum (Long_Long_Integer (Arg))); 152 Set_Bignum (Result, To_Bignum (Long_Long_Integer (Arg))); 180 Set_Bignum (Result, To_Bignum (Unsigned_64 (Arg))); 285 Set_Bignum (Result, To_Bignum (Long_Long_Integer'Value (Arg))); 414 Exp : Bignum := To_Bignum (Long_Long_Integer (R)); 469 This.C := To_Address (new Bignum_Data'(To_Bignum (This.C).all)); 478 Tmp : Bignum := To_Bignum (This.C);
|
H A D | s-genbig.ads | 87 function To_Bignum is new Ada.Unchecked_Conversion (System.Address, Bignum); subprogram 120 function To_Bignum (X : Long_Long_Integer) return Bignum; subprogspec 124 function To_Bignum (X : Interfaces.Unsigned_64) return Bignum; subprogspec
|
H A D | s-bignum.ads | 70 function To_Bignum (X : Long_Long_Integer) return Bignum; subprogspec 98 pragma Inline (To_Bignum);
|
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/libgnat/ |
H A D | a-nbnbin.adb | 50 else To_Bignum (Arg.Value.C)); 126 Set_Bignum (Result, To_Bignum (Long_Long_Integer (Arg))); 152 Set_Bignum (Result, To_Bignum (Long_Long_Integer (Arg))); 180 Set_Bignum (Result, To_Bignum (Unsigned_64 (Arg))); 285 Set_Bignum (Result, To_Bignum (Long_Long_Integer'Value (Arg))); 414 Exp : Bignum := To_Bignum (Long_Long_Integer (R)); 469 This.C := To_Address (new Bignum_Data'(To_Bignum (This.C).all)); 478 Tmp : Bignum := To_Bignum (This.C);
|
H A D | s-genbig.ads | 87 function To_Bignum is new Ada.Unchecked_Conversion (System.Address, Bignum); subprogram 120 function To_Bignum (X : Long_Long_Integer) return Bignum; subprogspec 124 function To_Bignum (X : Interfaces.Unsigned_64) return Bignum; subprogspec
|
H A D | s-bignum.ads | 70 function To_Bignum (X : Long_Long_Integer) return Bignum; subprogspec 98 pragma Inline (To_Bignum);
|
/dports/lang/gcc10/gcc-10.3.0/gcc/ada/libgnat/ |
H A D | a-nbnbin.adb | 50 else To_Bignum (Arg.Value.C)); 126 Set_Bignum (Result, To_Bignum (Long_Long_Integer (Arg))); 152 Set_Bignum (Result, To_Bignum (Long_Long_Integer (Arg))); 180 Set_Bignum (Result, To_Bignum (Unsigned_64 (Arg))); 285 Set_Bignum (Result, To_Bignum (Long_Long_Integer'Value (Arg))); 414 Exp : Bignum := To_Bignum (Long_Long_Integer (R)); 469 This.C := To_Address (new Bignum_Data'(To_Bignum (This.C).all)); 478 Tmp : Bignum := To_Bignum (This.C);
|
H A D | s-genbig.ads | 87 function To_Bignum is new Ada.Unchecked_Conversion (System.Address, Bignum); subprogram 120 function To_Bignum (X : Long_Long_Integer) return Bignum; subprogspec 124 function To_Bignum (X : Interfaces.Unsigned_64) return Bignum; subprogspec
|