@@ -195,6 +195,7 @@ typedef struct
extern const avr_arch_t avr_arch_types[];
extern const avr_arch_t *avr_arch;
+extern const avr_arch_t *avr_get_parch (const char *mcu);
extern const avr_mcu_t avr_mcu_types[];
@@ -153,4 +153,20 @@ avr_inform_core_architectures (void)
free (archs);
}
+
+/* When MCU names a core arch like "avr5", then return a pointer to the
+ respective entry in avr_arch_types[]. Otherwise, return NULL. */
+
+const avr_arch_t *
+avr_get_parch (const char *mcu)
+{
+ for (size_t i = 0; i < ARRAY_SIZE (avr_arch_types); ++i)
+ {
+ if (strcmp (mcu, avr_arch_types[i].name) == 0)
+ return & avr_arch_types[i];
+ }
+
+ return NULL;
+}
+
#endif // IN_GEN_AVR_MMCU_TEXI
@@ -500,9 +500,11 @@ typedef struct avr_args
extern const char *avr_devicespecs_file (int, const char**);
extern const char *avr_double_lib (int, const char**);
+extern const char *avr_no_devlib (int, const char**);
#define EXTRA_SPEC_FUNCTIONS \
{ "double-lib", avr_double_lib }, \
+ { "no-devlib", avr_no_devlib }, \
{ "device-specs-file", avr_devicespecs_file },
/* Driver self specs has lmited functionality w.r.t. '%s' for dynamic specs.
@@ -105,7 +105,12 @@ avr_devicespecs_file (int argc, const char **argv)
return concat ("%{!nodevicespecs:-specs=device-specs", dir_separator_str,
"specs-", mmcu, "%s} %<nodevicespecs"
#if defined (WITH_AVRLIBC)
- " %{mmcu=avr*:" X_NODEVLIB "} %{!mmcu=*:" X_NODEVLIB "}",
+ // Return X_NODEVLIB when we are compiling for a core. As
+ // there are devices like AVR128DA32, a simple mmcu=avr* to
+ // discriminate between cores and devices ceased to work,
+ // hence use spec function no-devlib=avr_no_devlib from below.
+ // See also PR107201.
+ " %{mmcu=avr*:%:no-devlib(avr%*)} %{!mmcu=*:" X_NODEVLIB "}",
#else
" " X_NODEVLIB,
#endif
@@ -113,6 +118,22 @@ avr_devicespecs_file (int argc, const char **argv)
}
+/* Return X_NODEVLIB when ARGV[] contains a core like "avr5",
+ otherwise return "". */
+
+const char*
+avr_no_devlib (int argc, const char **argv)
+{
+ for (int i = 0; i < argc; ++i)
+ {
+ if (avr_get_parch (argv[i]))
+ return X_NODEVLIB;
+ }
+
+ return "";
+}
+
+
/* Re-build the -mdouble= and -mlong-double= options. This is needed
because these options are not independent of each other. */