+ /* Martin Leopold: add an "async" gcc attribute to any async elements for targets
+ that need to identify functions callable from interrupts. */
+ if (fn->definition && target->async_functions_atribute)
+ {
+ function_decl fd = CAST(function_decl, fn->definition);
+ location l = fd->modifiers->location;
+ region r = parse_region;
+ word aname = new_word(r, l, str2cstring(r, target->async_functions_atribute));
+ target_attribute attr = new_target_attribute(r, l, aname, NULL);
+
+ fd->attributes = attribute_chain(attr, fd->attributes);
+ }
+