https://gcc.gnu.org/bugzilla/show_bug.cgi?id=94586
--- Comment #20 from Steve Kargl <sgk at troutmask dot apl.washington.edu> --- On Thu, Apr 16, 2020 at 01:10:21AM +0000, dave.anglin at bell dot net wrote: > https://gcc.gnu.org/bugzilla/show_bug.cgi?id=94586 > > --- Comment #18 from dave.anglin at bell dot net --- > On 2020-04-15 2:14 p.m., sgk at troutmask dot apl.washington.edu wrote: > > What does -fdump-tree-original show for > > > > function foo(x) > > real(16) foo, x > > foo = cos(x) > > end function foo > foo (real(kind=16) & restrict x) > { > real(kind=16) __result_foo; > > __result_foo = __builtin_cosl (*x); > return __result_foo; > } This is what I anticipated after I sent the email. With -fno-builtin, you'll get cosl, which you don't have. So, you'll need to figure out how to force gfortran to use 'q' suffixes instead of 'l'. I don't know how the frontend will handle this. Using weak references as you suggested in your other reply might be the easily (if it worked).