Lines Matching refs:Comp_Last
2836 Comp_Last : Integer; variable
2906 Comp_Last := Comp_Next + Args'Length - 3;
2910 Comp_Last := Comp_Next + Args'Length - 1;
2920 Last : constant Natural := Comp_Last;
2932 Comp_Last := Comp_Last - 1;
2954 Comp_Args (Comp_Args'First + 2 .. Comp_Last + 1) :=
2955 Comp_Args (Comp_Args'First + 1 .. Comp_Last);
2956 Comp_Last := Comp_Last + 1;
2976 Comp_Last := Comp_Last + 1;
2977 Comp_Args (Comp_Last) := Ada_Flag_1;
2978 Comp_Last := Comp_Last + 1;
2979 Comp_Args (Comp_Last) := AdaSCIL_Flag;
2982 Comp_Last := Comp_Last + 1;
2983 Comp_Args (Comp_Last) := Ada_Flag_1;
2984 Comp_Last := Comp_Last + 1;
2985 Comp_Args (Comp_Last) := Ada_Flag_2;
2992 Comp_Last := Comp_Last + 1;
2993 Comp_Args (Comp_Last) :=
3014 Comp_Last := Comp_Last + 1;
3015 Comp_Args (Comp_Last) := Output_Flag;
3016 Comp_Last := Comp_Last + 1;
3022 Comp_Args (Comp_Last) :=
3027 Comp_Args (Comp_Last) :=
3033 Comp_Last := Comp_Last + 1;
3034 Comp_Args (Comp_Last) := new String'(Mapping_File_Arg.all);
3039 Comp_Last := Comp_Last + 1;
3040 Comp_Args (Comp_Last) := new String'(Name_Buffer (1 .. Name_Len));
3048 GNAT.OS_Lib.Normalize_Arguments (Comp_Args (Args'First .. Comp_Last));
3050 Comp_Last := Comp_Last + 1;
3051 Comp_Args (Comp_Last) := new String'("-gnatez");
3053 Display (Gcc.all, Comp_Args (Args'First .. Comp_Last));
3061 (Gcc_Path.all, Comp_Args (Args'First .. Comp_Last));