aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
Diffstat (limited to 'gcc')
-rw-r--r--gcc/ada/gcc-interface/Make-lang.in7
-rw-r--r--gcc/ada/gcc-interface/decl.c2
2 files changed, 4 insertions, 5 deletions
diff --git a/gcc/ada/gcc-interface/Make-lang.in b/gcc/ada/gcc-interface/Make-lang.in
index 89b5750..d88c354 100644
--- a/gcc/ada/gcc-interface/Make-lang.in
+++ b/gcc/ada/gcc-interface/Make-lang.in
@@ -42,7 +42,7 @@ MV = mv
MKDIR = mkdir -p
RM = rm -f
RMDIR = rm -rf
-
+
# Extra flags to pass to recursive makes.
COMMON_ADAFLAGS= -gnatpg
@@ -814,7 +814,6 @@ doc/gnat_rm.pdf: ada/gnat_rm.texi $(gcc_docdir)/include/fdl.texi \
doc/gnat-style.pdf: ada/gnat-style.texi $(gcc_docdir)/include/fdl.texi
$(TEXI2PDF) -c -I $(abs_docdir)/include -o $@ $<
-
# Install hooks:
# gnat1 is installed elsewhere as part of $(COMPILERS).
@@ -908,7 +907,7 @@ ada.maintainer-clean:
-$(RM) ada/nmake.ads
-$(RM) ada/treeprs.ads
-$(RM) ada/snames.ads ada/snames.adb ada/snames.h
-
+
# Stage hooks:
# The main makefile has already created stage?/ada
@@ -1005,7 +1004,7 @@ $(check_acats_targets): check-acats%:
touch $$GCC_RUNTEST_PARALLELIZE_DIR/finished
.PHONY: check-acats $(check_acats_targets)
-
+
# Compiling object files from source files.
# Ada language specific files.
diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c
index 7caca6a..5ea1b16 100644
--- a/gcc/ada/gcc-interface/decl.c
+++ b/gcc/ada/gcc-interface/decl.c
@@ -10353,7 +10353,7 @@ create_concat_name (Entity_Id gnat_entity, const char *suffix)
{
const Entity_Kind kind = Ekind (gnat_entity);
const bool has_suffix = (suffix != NULL);
- String_Template temp = {1, has_suffix ? strlen (suffix) : 0};
+ String_Template temp = {1, has_suffix ? (int) strlen (suffix) : 0};
String_Pointer sp = {suffix, &temp};
Get_External_Name (gnat_entity, has_suffix, sp);