Added fortran ability to use the task timers

fortran_examples/test.F90

@@ -72,6 +72,9 @@ end do
 
 
   Call qsched_run(sched, nr_threads, fun)
+  call qsched_dump_task_timers(sched, c_char_"TASKTIMERS") 
+
 call qsched_free(sched)
 call f_qsched_destroy(sched)
+
 End Program

src/fqsched.F90

@@ -132,7 +132,7 @@ Module quicksched
 
 !TODO Not supporting qsched_addtask_dynamic yet.
 
-    Subroutine qsched_ensure(s, nr_tasks, nr_res, nr_deps, nr_locks, nr_uses, size_data)
+    Subroutine qsched_ensure(s, nr_tasks, nr_res, nr_deps, nr_locks, nr_uses, size_data) BIND(C)
       Use, Intrinsic:: ISO_C_BINDING
       Implicit None
 
@@ -146,7 +146,7 @@ Module quicksched
 
     End Subroutine
 
-    Subroutine qsched_res_own(s, res, owner)
+    Subroutine qsched_res_own(s, res, owner) BIND(C)
       Use, Intrinsic:: ISO_C_BINDING
       Implicit None
 
@@ -155,6 +155,16 @@ Module quicksched
       Integer(Kind=C_INT), Intent(In), VALUE :: owner
 
     End Subroutine
+  
+    Subroutine qsched_dump_task_timers(s, filename) BIND(C)
+      Use, Intrinsic :: ISO_C_BINDING
+      Implicit None
+
+      Type(C_PTR), VALUE :: s
+      character(kind=c_char),  intent(in) :: filename(*)
+    End Subroutine
   End Interface
 
+
+
 End Module quicksched