From 554fd8c5195424bdbcabf5de30fdc183aba391bd Mon Sep 17 00:00:00 2001
From: upstream source tree <ports@midipix.org>
Date: Sun, 15 Mar 2015 20:14:05 -0400
Subject: obtained gcc-4.6.4.tar.bz2 from upstream website; verified
 gcc-4.6.4.tar.bz2.sig; imported gcc-4.6.4 source tree from verified upstream
 tarball.

downloading a git-generated archive based on the 'upstream' tag
should provide you with a source tree that is binary identical
to the one extracted from the above tarball.

if you have obtained the source via the command 'git clone',
however, do note that line-endings of files in your working
directory might differ from line-endings of the respective
files in the upstream repository.
---
 gcc/testsuite/gfortran.dg/specifics_2.f90 | 81 +++++++++++++++++++++++++++++++
 1 file changed, 81 insertions(+)
 create mode 100644 gcc/testsuite/gfortran.dg/specifics_2.f90

(limited to 'gcc/testsuite/gfortran.dg/specifics_2.f90')

diff --git a/gcc/testsuite/gfortran.dg/specifics_2.f90 b/gcc/testsuite/gfortran.dg/specifics_2.f90
new file mode 100644
index 000000000..4de092564
--- /dev/null
+++ b/gcc/testsuite/gfortran.dg/specifics_2.f90
@@ -0,0 +1,81 @@
+! { dg-do compile }
+! This is the list of intrinsics allowed as actual arguments
+ intrinsic abs,acos,acosh,aimag,aint,alog,alog10,amod,anint,asin,asinh,atan,&
+ atan2,atanh,cabs,ccos,cexp,clog,conjg,cos,cosh,csin,csqrt,dabs,dacos,&
+ dacosh,dasin,dasinh,datan,datan2,datanh,dconjg,dcos,dcosh,ddim,dexp,dim,&
+ dimag,dint,dlog,dlog10,dmod,dnint,dprod,dsign,dsin,dsinh,dsqrt,dtan,dtanh,&
+ exp,iabs,idim,idnint,index,isign,len,mod,nint,sign,sin,sinh,sqrt,tan,&
+ tanh,zabs,zcos,zexp,zlog,zsin,zsqrt
+ 
+  call foo(abs)
+  call foo(acos)
+  call foo(acosh)
+  call foo(aimag)
+  call foo(aint)
+  call foo(alog)
+  call foo(alog10)
+  call foo(amod)
+  call foo(anint)
+  call foo(asin)
+  call foo(asinh)
+  call foo(atan)
+  call foo(atan2)
+  call foo(atanh)
+  call foo(cabs)
+  call foo(ccos)
+  call foo(cexp)
+  call foo(clog)
+  call foo(conjg)
+  call foo(cos)
+  call foo(cosh)
+  call foo(csin)
+  call foo(csqrt)
+  call foo(dabs)
+  call foo(dacos)
+  call foo(dacosh)
+  call foo(dasin)
+  call foo(dasinh)
+  call foo(datan)
+  call foo(datan2)
+  call foo(datanh)
+  call foo(dconjg)
+  call foo(dcos)
+  call foo(dcosh)
+  call foo(ddim)
+  call foo(dexp)
+  call foo(dim)
+  call foo(dimag)
+  call foo(dint)
+  call foo(dlog)
+  call foo(dlog10)
+  call foo(dmod)
+  call foo(dnint)
+  call foo(dprod)
+  call foo(dsign)
+  call foo(dsin)
+  call foo(dsinh)
+  call foo(dsqrt)
+  call foo(dtan)
+  call foo(dtanh)
+  call foo(exp)
+  call foo(iabs)
+  call foo(idim)
+  call foo(idnint)
+  call foo(index)
+  call foo(isign)
+  call foo(len)
+  call foo(mod)
+  call foo(nint)
+  call foo(sign)
+  call foo(sin)
+  call foo(sinh)
+  call foo(sqrt)
+  call foo(tan)
+  call foo(tanh)
+  call foo(zabs)
+  call foo(zcos)
+  call foo(zexp)
+  call foo(zlog)
+  call foo(zsin)
+  call foo(zsqrt)
+  end
-- 
cgit v1.2.3