diff options
| author | Jim Cownie <james.h.cownie@intel.com> | 2014-05-10 17:02:09 +0000 |
|---|---|---|
| committer | Jim Cownie <james.h.cownie@intel.com> | 2014-05-10 17:02:09 +0000 |
| commit | 18d8473f185999e418dcb62ee4d8a671c2eacee5 (patch) | |
| tree | d212f5cac426b2be33035984fc56623f92f5ddde /openmp/testsuite/fortran/has_openmp.f | |
| parent | 281f9d0e97dca0594a15341e3c927e2667773104 (diff) | |
| download | bcm5719-llvm-18d8473f185999e418dcb62ee4d8a671c2eacee5.tar.gz bcm5719-llvm-18d8473f185999e418dcb62ee4d8a671c2eacee5.zip | |
Add testsuite from OpenUH
llvm-svn: 208472
Diffstat (limited to 'openmp/testsuite/fortran/has_openmp.f')
| -rw-r--r-- | openmp/testsuite/fortran/has_openmp.f | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/openmp/testsuite/fortran/has_openmp.f b/openmp/testsuite/fortran/has_openmp.f new file mode 100644 index 00000000000..5585ef21a6c --- /dev/null +++ b/openmp/testsuite/fortran/has_openmp.f @@ -0,0 +1,25 @@ +<ompts:test> +<ompts:version>2.0</ompts:version> +<ompts:testdescription>Testing if the conditional compilation is supported or not. +Yi Wen at 05032004: Do we want to write two versions of has_omp? both C23456789 +and #ifdef formats are supposed to work. At least Sun's compiler cannot deal with +the second format (#ifdef)</ompts:testdescription> + +<ompts:testcode> + INTEGER FUNCTION <ompts:testcode:functionname>has_openmp</ompts:testcode:functionname>() + <testfunctionname></testfunctionname> = 0 + +<ompts:check> +!version 1. +!C23456789 +!$ <testfunctionname></testfunctionname> = 1 + +! version 2. +!#ifdef _OPENMP + <testfunctionname></testfunctionname> = 1 +!#endif +</ompts:check> + + END FUNCTION +</ompts:testcode> +</ompts:test> |
