diff options
Diffstat (limited to 'openmp/testsuite/c/omp_get_wtick.c')
| -rw-r--r-- | openmp/testsuite/c/omp_get_wtick.c | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/openmp/testsuite/c/omp_get_wtick.c b/openmp/testsuite/c/omp_get_wtick.c new file mode 100644 index 00000000000..e82b57fcb80 --- /dev/null +++ b/openmp/testsuite/c/omp_get_wtick.c @@ -0,0 +1,24 @@ +<ompts:test> +<ompts:testdescription>Test which checks the omp_get_wtick function.</ompts:testdescription> +<ompts:ompversion>2.0</ompts:ompversion> +<ompts:directive>omp_get_wtick</ompts:directive> +<ompts:testcode> +#include<stdio.h> + +#include "omp_testsuite.h" + +int <ompts:testcode:functionname>omp_get_wtick</ompts:testcode:functionname>(FILE * logFile) +{ + <ompts:orphan:vars> + double tick; + </ompts:orphan:vars> + tick = -1.; + + <ompts:orphan> + <ompts:check>tick = omp_get_wtick ();</ompts:check> + </ompts:orphan> + fprintf (logFile, "Work took %lf sec. time.\n", tick); + return ((tick > 0.0) && (tick < 0.01)); +} +</ompts:testcode> +</ompts:test> |
