/dports/devel/zpu-gcc/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/ |
H A D | a-stwifi.adb | 275 Tlength : constant Integer := Target'Length; constant 294 if Slength = Tlength then 297 elsif Slength > Tlength then 301 Target := Source (Slast - Tlength + 1 .. Slast); 304 Target := Source (Sfirst .. Sfirst + Tlength - 1); 309 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 317 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 318 Target := Source (Slast - Tlength + 1 .. Slast); 349 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
/dports/devel/zpu-binutils/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/ |
H A D | a-stwifi.adb | 275 Tlength : constant Integer := Target'Length; constant 294 if Slength = Tlength then 297 elsif Slength > Tlength then 301 Target := Source (Slast - Tlength + 1 .. Slast); 304 Target := Source (Sfirst .. Sfirst + Tlength - 1); 309 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 317 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 318 Target := Source (Slast - Tlength + 1 .. Slast); 349 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/libgnat/ |
H A D | a-stwifi.adb | 303 Tlength : constant Integer := Target'Length; constant 326 if Slength = Tlength then 329 elsif Slength > Tlength then 332 Target := Source (Slast - Tlength + 1 .. Slast); 335 Target := Source (Sfirst .. Sfirst + Tlength - 1); 340 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 348 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 349 Target := Source (Slast - Tlength + 1 .. Slast); 379 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
H A D | a-stzfix.adb | 309 Tlength : constant Integer := Target'Length; constant 328 if Slength = Tlength then 331 elsif Slength > Tlength then 334 Target := Source (Slast - Tlength + 1 .. Slast); 337 Target := Source (Sfirst .. Sfirst + Tlength - 1); 342 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 350 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 351 Target := Source (Slast - Tlength + 1 .. Slast); 382 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
H A D | a-strfix.adb | 329 Tlength : constant Integer := Target'Length; constant 348 if Slength = Tlength then 351 elsif Slength > Tlength then 354 Target := Source (Slast - Tlength + 1 .. Slast); 357 Target := Source (Sfirst .. Sfirst + Tlength - 1); 362 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 370 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 371 Target := Source (Slast - Tlength + 1 .. Slast); 401 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
/dports/lang/gcc6-aux/gcc-6-20180516/gcc/ada/ |
H A D | a-strfix.adb | 329 Tlength : constant Integer := Target'Length; constant 348 if Slength = Tlength then 351 elsif Slength > Tlength then 355 Target := Source (Slast - Tlength + 1 .. Slast); 358 Target := Source (Sfirst .. Sfirst + Tlength - 1); 363 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 371 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 372 Target := Source (Slast - Tlength + 1 .. Slast); 403 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
/dports/lang/gcc9/gcc-9.4.0/gcc/ada/libgnat/ |
H A D | a-stwifi.adb | 303 Tlength : constant Integer := Target'Length; constant 326 if Slength = Tlength then 329 elsif Slength > Tlength then 332 Target := Source (Slast - Tlength + 1 .. Slast); 335 Target := Source (Sfirst .. Sfirst + Tlength - 1); 340 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 348 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 349 Target := Source (Slast - Tlength + 1 .. Slast); 379 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/ada/libgnat/ |
H A D | a-stwifi.adb | 303 Tlength : constant Integer := Target'Length; constant 326 if Slength = Tlength then 329 elsif Slength > Tlength then 332 Target := Source (Slast - Tlength + 1 .. Slast); 335 Target := Source (Sfirst .. Sfirst + Tlength - 1); 340 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 348 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 349 Target := Source (Slast - Tlength + 1 .. Slast); 379 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
H A D | a-strfix.adb | 329 Tlength : constant Integer := Target'Length; constant 348 if Slength = Tlength then 351 elsif Slength > Tlength then 354 Target := Source (Slast - Tlength + 1 .. Slast); 357 Target := Source (Sfirst .. Sfirst + Tlength - 1); 362 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 370 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 371 Target := Source (Slast - Tlength + 1 .. Slast); 401 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
H A D | a-stzfix.adb | 309 Tlength : constant Integer := Target'Length; constant 328 if Slength = Tlength then 331 elsif Slength > Tlength then 334 Target := Source (Slast - Tlength + 1 .. Slast); 337 Target := Source (Sfirst .. Sfirst + Tlength - 1); 342 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 350 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 351 Target := Source (Slast - Tlength + 1 .. Slast); 382 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
/dports/devel/avr-gcc/gcc-10.2.0/gcc/ada/libgnat/ |
H A D | a-stwifi.adb | 303 Tlength : constant Integer := Target'Length; constant 326 if Slength = Tlength then 329 elsif Slength > Tlength then 332 Target := Source (Slast - Tlength + 1 .. Slast); 335 Target := Source (Sfirst .. Sfirst + Tlength - 1); 340 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 348 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 349 Target := Source (Slast - Tlength + 1 .. Slast); 379 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
H A D | a-stzfix.adb | 309 Tlength : constant Integer := Target'Length; constant 328 if Slength = Tlength then 331 elsif Slength > Tlength then 334 Target := Source (Slast - Tlength + 1 .. Slast); 337 Target := Source (Sfirst .. Sfirst + Tlength - 1); 342 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 350 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 351 Target := Source (Slast - Tlength + 1 .. Slast); 382 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/ada/libgnat/ |
H A D | a-strfix.adb | 329 Tlength : constant Integer := Target'Length; constant 348 if Slength = Tlength then 351 elsif Slength > Tlength then 354 Target := Source (Slast - Tlength + 1 .. Slast); 357 Target := Source (Sfirst .. Sfirst + Tlength - 1); 362 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 370 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 371 Target := Source (Slast - Tlength + 1 .. Slast); 401 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
H A D | a-stzfix.adb | 309 Tlength : constant Integer := Target'Length; constant 328 if Slength = Tlength then 331 elsif Slength > Tlength then 334 Target := Source (Slast - Tlength + 1 .. Slast); 337 Target := Source (Sfirst .. Sfirst + Tlength - 1); 342 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 350 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 351 Target := Source (Slast - Tlength + 1 .. Slast); 382 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
H A D | a-stwifi.adb | 303 Tlength : constant Integer := Target'Length; constant 326 if Slength = Tlength then 329 elsif Slength > Tlength then 332 Target := Source (Slast - Tlength + 1 .. Slast); 335 Target := Source (Sfirst .. Sfirst + Tlength - 1); 340 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 348 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 349 Target := Source (Slast - Tlength + 1 .. Slast); 379 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
/dports/lang/gnat_util/gcc-6-20180516/gcc/ada/ |
H A D | a-strfix.adb | 329 Tlength : constant Integer := Target'Length; constant 348 if Slength = Tlength then 351 elsif Slength > Tlength then 355 Target := Source (Slast - Tlength + 1 .. Slast); 358 Target := Source (Sfirst .. Sfirst + Tlength - 1); 363 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 371 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 372 Target := Source (Slast - Tlength + 1 .. Slast); 403 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
H A D | a-stwifi.adb | 303 Tlength : constant Integer := Target'Length; constant 326 if Slength = Tlength then 329 elsif Slength > Tlength then 333 Target := Source (Slast - Tlength + 1 .. Slast); 336 Target := Source (Sfirst .. Sfirst + Tlength - 1); 341 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 349 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 350 Target := Source (Slast - Tlength + 1 .. Slast); 381 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
H A D | a-stzfix.adb | 309 Tlength : constant Integer := Target'Length; constant 328 if Slength = Tlength then 331 elsif Slength > Tlength then 335 Target := Source (Slast - Tlength + 1 .. Slast); 338 Target := Source (Sfirst .. Sfirst + Tlength - 1); 343 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 351 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 352 Target := Source (Slast - Tlength + 1 .. Slast); 383 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/libgnat/ |
H A D | a-stzfix.adb | 309 Tlength : constant Integer := Target'Length; constant 328 if Slength = Tlength then 331 elsif Slength > Tlength then 334 Target := Source (Slast - Tlength + 1 .. Slast); 337 Target := Source (Sfirst .. Sfirst + Tlength - 1); 342 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 350 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 351 Target := Source (Slast - Tlength + 1 .. Slast); 382 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
H A D | a-stwifi.adb | 303 Tlength : constant Integer := Target'Length; constant 326 if Slength = Tlength then 329 elsif Slength > Tlength then 332 Target := Source (Slast - Tlength + 1 .. Slast); 335 Target := Source (Sfirst .. Sfirst + Tlength - 1); 340 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 348 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 349 Target := Source (Slast - Tlength + 1 .. Slast); 379 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
/dports/lang/gcc48/gcc-4.8.5/gcc/ada/ |
H A D | a-strfix.adb | 329 Tlength : constant Integer := Target'Length; constant 348 if Slength = Tlength then 351 elsif Slength > Tlength then 355 Target := Source (Slast - Tlength + 1 .. Slast); 358 Target := Source (Sfirst .. Sfirst + Tlength - 1); 363 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 371 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 372 Target := Source (Slast - Tlength + 1 .. Slast); 403 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
H A D | a-stwifi.adb | 303 Tlength : constant Integer := Target'Length; constant 326 if Slength = Tlength then 329 elsif Slength > Tlength then 333 Target := Source (Slast - Tlength + 1 .. Slast); 336 Target := Source (Sfirst .. Sfirst + Tlength - 1); 341 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 349 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 350 Target := Source (Slast - Tlength + 1 .. Slast); 381 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
H A D | a-stzfix.adb | 309 Tlength : constant Integer := Target'Length; constant 328 if Slength = Tlength then 331 elsif Slength > Tlength then 335 Target := Source (Slast - Tlength + 1 .. Slast); 338 Target := Source (Sfirst .. Sfirst + Tlength - 1); 343 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 351 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 352 Target := Source (Slast - Tlength + 1 .. Slast); 383 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/libgnat/ |
H A D | a-stwifi.adb | 303 Tlength : constant Integer := Target'Length; constant 326 if Slength = Tlength then 329 elsif Slength > Tlength then 332 Target := Source (Slast - Tlength + 1 .. Slast); 335 Target := Source (Sfirst .. Sfirst + Tlength - 1); 340 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 348 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 349 Target := Source (Slast - Tlength + 1 .. Slast); 379 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|
H A D | a-stzfix.adb | 309 Tlength : constant Integer := Target'Length; constant 328 if Slength = Tlength then 331 elsif Slength > Tlength then 334 Target := Source (Slast - Tlength + 1 .. Slast); 337 Target := Source (Sfirst .. Sfirst + Tlength - 1); 342 if Is_Padding (Source (Sfirst + Tlength .. Slast)) then 350 if Is_Padding (Source (Sfirst .. Slast - Tlength)) then 351 Target := Source (Slast - Tlength + 1 .. Slast); 382 Front_Pad : constant Integer := (Tlength - Slength) / 2;
|