/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/libgnat/ |
H A D | a-ticoau.adb | 166 Rptr : Natural; variable 171 Rptr := 0; 172 Aux.Set_Image (ItemR, R_String, Rptr, 0, Aft, Exp); 178 if Rptr + Iptr + 3 > To'Length then 185 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 186 To (To'First + Rptr + 1) := ','; 191 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
/dports/databases/grass7/grass-7.8.6/raster/r.surf.idw/ |
H A D | main.c | 244 MELEMENT *Rptr; in interpolate() local 273 Rptr++, ewptr++) in interpolate() 708 for (row = 0, Rptr = rowlist; row < rows; row++, Rptr++) in row_lists() 709 Rptr->prior = Rptr; in row_lists() 729 Rptr->prior = (Rptr->prior->next = Mptr); in row_lists() 733 if (Rptr->prior != Rptr) /* non-zero input data in this row */ in row_lists() 734 Rptr++->y = row; in row_lists() 740 for (Rptr = rowlist; Rptr != endlist; Rptr++) in row_lists() 742 Rptr->next->prior = Rptr->prior; in row_lists() 743 Rptr->prior->next = Rptr->next; in row_lists() [all …]
|
/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/libgnat/ |
H A D | a-ticoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 196 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
H A D | a-ztcoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 197 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
/dports/lang/gcc6-aux/bootstrap/lib/gcc/x86_64-aux-dragonfly4.1/5.1.0/adainclude/ |
H A D | a-ticoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 196 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
H A D | a-wtcoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 197 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
H A D | a-ztcoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 197 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
/dports/lang/gcc9/gcc-9.4.0/gcc/ada/libgnat/ |
H A D | a-ticoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 196 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
H A D | a-wtcoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 197 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
H A D | a-ztcoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 197 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
/dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/ada/ |
H A D | a-ticoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 196 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
H A D | a-wtcoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 197 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
H A D | a-ztcoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 197 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/ada/libgnat/ |
H A D | a-ztcoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 197 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
H A D | a-wtcoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 197 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
H A D | a-ticoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 196 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
/dports/devel/avr-gcc/gcc-10.2.0/gcc/ada/libgnat/ |
H A D | a-wtcoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 197 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
H A D | a-ztcoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 197 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
H A D | a-ticoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 196 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/ada/libgnat/ |
H A D | a-ticoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 196 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
H A D | a-ztcoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 197 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
H A D | a-wtcoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 197 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
/dports/lang/gnat_util/gcc-6-20180516/gcc/ada/ |
H A D | a-wtcoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 197 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
H A D | a-ztcoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 197 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|
H A D | a-ticoau.adb | 171 Rptr : Natural; variable 176 Rptr := 0; 177 Set_Image_Real (ItemR, R_String, Rptr, 0, Aft, Exp); 183 if Rptr + Iptr + 3 > To'Length then 190 To (To'First + 1 .. To'First + Rptr) := R_String (1 .. Rptr); 191 To (To'First + Rptr + 1) := ','; 196 for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop
|