Bill Somerville
95926577ae
Make Fortran profiling timer function a callback with a default null implementation
...
Groundwork for calling the decoders directly from C/C++ threads.
To access the timer module timer_module must now be used.
Instrumented code need only use the module function 'timer' which is
now a procedure pointer that is guaranteed to be associated (unless
null() is assigned to it, which should not be done). The default
behaviour of 'timer' is to do nothing.
If a Fortran program wishes to profile code it should now use the
timer_impl module which contains a default timer implementation. The
main program should call 'init_timer([filename])' before using 'timer'
or calling routines that are instrumented. If
'init_timer([filename])'. If it is called then an optional file name
may be provided with 'timer.out' being used as a default. The
procedure 'fini_timer()' may be called to close the file.
The default timer implementation is thread safe if used with OpenMP
multi-threaded code so long as the OpenMP thread team is given the
copyin(/timer_private/) attribute for correct operation. The common
block /timer_private/ should be included for OpenMP use by including
the file 'timer_common.inc'.
The module 'lib/timer_C_wrapper.f90' provides a Fortran wrapper along
with 'init' and 'fini' subroutines which allow a C/C++ application to
call timer instrumented Fortran code and for it to receive callbacks
of 'timer()' subroutine invocations. No C/C++ timer implementation is
provided at this stage.
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6320 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
2015-12-27 15:40:57 +00:00
..
2015-12-27 00:17:20 +00:00
2015-12-14 19:40:44 +00:00
2015-12-14 19:40:44 +00:00
2015-04-22 17:48:03 +00:00
2015-11-25 16:40:22 +00:00
2014-12-18 21:06:21 +00:00
2015-11-18 01:28:12 +00:00
2015-11-18 01:28:12 +00:00
2015-11-18 01:28:12 +00:00
2015-06-11 14:38:31 +00:00
2015-06-08 17:45:11 +00:00
2015-06-11 15:32:55 +00:00
2015-06-11 18:49:42 +00:00
2013-03-23 15:41:31 +00:00
2014-01-27 21:28:54 +00:00
2015-11-25 16:40:22 +00:00
2013-07-08 13:17:22 +00:00
2013-07-08 13:17:22 +00:00
2015-01-28 12:52:24 +00:00
2015-01-28 12:52:24 +00:00
2015-12-15 01:36:05 +00:00
2014-12-18 21:06:21 +00:00
2013-07-08 13:17:22 +00:00
2014-01-30 18:03:21 +00:00
2015-02-27 15:38:24 +00:00
2015-12-14 19:40:44 +00:00
2015-12-27 15:40:57 +00:00
2012-10-03 14:31:43 +00:00
2014-03-05 20:14:36 +00:00
2015-05-29 19:25:12 +00:00
2015-11-18 01:28:12 +00:00
2012-10-03 14:31:43 +00:00
2015-12-27 15:40:57 +00:00
2015-07-06 17:26:40 +00:00
2015-12-27 15:40:57 +00:00
2015-12-16 21:16:23 +00:00
2013-07-08 13:17:22 +00:00
2015-12-27 15:40:57 +00:00
2015-04-22 17:48:03 +00:00
2013-05-23 13:33:29 +00:00
2015-11-23 18:20:55 +00:00
2015-12-09 21:02:37 +00:00
2014-01-08 18:38:15 +00:00
2015-12-27 15:40:57 +00:00
2015-04-22 17:48:03 +00:00
2015-05-27 13:08:28 +00:00
2012-10-03 14:31:43 +00:00
2012-10-03 14:31:43 +00:00
2015-11-18 01:28:12 +00:00
2015-12-18 20:00:59 +00:00
2015-04-22 17:48:03 +00:00
2015-12-27 15:40:57 +00:00
2015-11-18 01:28:12 +00:00
2015-11-18 01:28:12 +00:00
2015-11-18 01:28:12 +00:00
2015-11-18 01:28:12 +00:00
2015-12-27 15:40:57 +00:00
2015-02-27 15:38:24 +00:00
2015-12-06 04:43:39 +00:00
2015-01-29 18:29:41 +00:00
2013-05-22 15:39:28 +00:00
2015-01-29 18:29:41 +00:00
2012-10-10 19:25:28 +00:00
2015-05-27 13:08:28 +00:00
2013-09-13 13:42:11 +00:00
2012-10-03 14:31:43 +00:00
2013-07-08 13:17:22 +00:00
2015-12-27 15:40:57 +00:00
2015-11-18 01:28:12 +00:00
2015-05-27 13:08:28 +00:00
2015-04-22 17:48:03 +00:00
2013-07-08 13:17:22 +00:00
2015-11-18 01:28:12 +00:00
2013-07-08 13:17:22 +00:00
2014-10-19 00:57:29 +00:00
2015-11-18 01:28:12 +00:00
2015-02-04 01:41:26 +00:00
2015-11-23 18:05:36 +00:00
2014-12-18 16:41:18 +00:00
2014-12-18 16:41:18 +00:00
2015-01-28 12:52:24 +00:00
2015-01-28 12:52:24 +00:00
2015-01-29 19:17:56 +00:00
2015-04-22 17:48:03 +00:00
2015-04-22 17:48:03 +00:00
2015-04-22 17:48:03 +00:00
2015-11-18 01:28:12 +00:00
2015-12-15 01:36:05 +00:00
2015-11-18 01:28:12 +00:00
2015-05-27 13:08:28 +00:00
2013-03-23 15:41:31 +00:00
2012-11-26 21:06:41 +00:00
2015-04-22 17:48:03 +00:00
2013-08-10 15:29:55 +00:00
2013-07-08 13:17:22 +00:00
2012-10-03 14:31:43 +00:00
2015-05-27 13:08:28 +00:00
2013-05-22 15:39:28 +00:00
2015-11-18 01:28:12 +00:00
2015-11-18 01:28:12 +00:00
2015-11-18 01:28:12 +00:00
2012-10-03 14:31:43 +00:00
2015-04-22 17:48:03 +00:00
2015-11-18 01:28:12 +00:00
2015-12-18 17:32:56 +00:00
2015-12-14 22:37:56 +00:00
2015-12-15 01:36:05 +00:00
2014-04-03 19:44:34 +00:00
2012-10-03 14:31:43 +00:00
2015-05-27 13:08:28 +00:00
2015-04-22 17:48:03 +00:00
2012-10-03 14:31:43 +00:00
2012-10-03 14:31:43 +00:00
2013-07-08 13:17:22 +00:00
2015-12-17 20:29:55 +00:00
2015-11-18 01:28:12 +00:00
2015-12-27 15:40:57 +00:00
2015-11-18 01:28:12 +00:00
2015-04-22 17:48:03 +00:00
2015-12-27 15:40:57 +00:00
2015-04-22 17:48:03 +00:00
2015-12-15 11:08:56 +00:00
2015-12-27 15:40:57 +00:00
2015-12-27 15:40:57 +00:00
2015-04-22 17:48:03 +00:00
2015-12-17 20:29:55 +00:00
2015-04-22 17:48:03 +00:00
2015-12-15 11:08:56 +00:00
2012-11-19 18:23:39 +00:00
2015-12-27 15:40:57 +00:00
2015-12-27 15:40:57 +00:00
2015-10-24 18:09:50 +00:00
2015-12-18 19:58:10 +00:00
2015-12-27 15:40:57 +00:00
2015-11-18 01:28:12 +00:00
2015-12-15 11:08:56 +00:00
2015-06-02 16:43:40 +00:00
2015-04-22 17:48:03 +00:00
2015-11-18 01:28:12 +00:00
2015-12-15 21:24:22 +00:00
2015-12-14 15:50:12 +00:00
2015-11-25 14:57:10 +00:00
2015-02-11 00:50:35 +00:00
2015-02-11 00:50:35 +00:00
2014-10-21 13:47:19 +00:00
2013-08-02 19:52:25 +00:00
2015-11-18 01:28:12 +00:00
2015-11-18 01:28:12 +00:00
2012-10-03 14:31:43 +00:00
2015-05-27 13:08:28 +00:00
2015-11-18 01:28:12 +00:00
2013-03-25 12:17:21 +00:00
2013-07-08 13:17:22 +00:00
2012-10-04 02:05:14 +00:00
2015-11-18 01:28:12 +00:00
2014-12-18 20:53:16 +00:00
2014-12-22 14:06:40 +00:00
2015-12-15 11:08:56 +00:00
2014-04-03 20:17:08 +00:00
2015-11-25 14:57:10 +00:00
2015-11-18 01:28:12 +00:00
2015-04-22 17:48:03 +00:00
2015-04-22 17:48:03 +00:00
2015-11-18 01:28:12 +00:00
2015-04-22 17:48:03 +00:00
2015-11-18 01:28:12 +00:00
2014-12-03 00:06:54 +00:00
2015-04-22 17:48:03 +00:00
2012-11-19 16:45:42 +00:00
2015-11-21 20:23:39 +00:00
2013-04-15 21:13:31 +00:00
2012-10-03 14:31:43 +00:00
2013-07-08 13:17:22 +00:00
2015-05-27 13:08:28 +00:00
2012-10-03 14:31:43 +00:00
2013-07-08 13:17:22 +00:00
2015-11-18 01:28:12 +00:00
2015-12-15 01:36:05 +00:00
2015-11-18 01:28:12 +00:00
2015-06-02 16:43:40 +00:00
2013-03-26 14:00:51 +00:00
2012-10-03 14:31:43 +00:00
2015-11-18 01:28:12 +00:00
2013-07-08 13:17:22 +00:00
2015-05-27 13:08:28 +00:00
2015-11-18 01:28:12 +00:00
2015-12-27 15:40:57 +00:00
2015-11-18 01:28:12 +00:00
2015-11-18 01:28:12 +00:00
2014-09-11 00:07:49 +00:00
2015-12-21 14:48:51 +00:00
2015-04-22 17:48:03 +00:00
2015-12-27 15:40:57 +00:00
2014-03-05 20:14:36 +00:00
2015-03-04 17:07:15 +00:00
2015-02-11 00:50:35 +00:00
2015-12-27 15:40:57 +00:00
2015-12-27 15:40:57 +00:00
2015-02-01 16:23:36 +00:00
2015-11-18 01:28:12 +00:00
2015-12-18 19:58:10 +00:00
2015-11-18 01:28:12 +00:00
2015-12-27 15:40:57 +00:00
2015-12-15 11:08:56 +00:00
2015-11-18 01:28:12 +00:00
2012-10-03 14:31:43 +00:00
2015-12-14 19:40:44 +00:00
2015-11-18 01:28:12 +00:00
2015-04-22 17:48:03 +00:00
2015-12-27 15:40:57 +00:00
2015-01-29 18:49:40 +00:00
2015-12-15 01:36:05 +00:00
2015-12-27 15:40:57 +00:00
2015-12-27 15:40:57 +00:00
2015-12-27 15:40:57 +00:00
2015-12-27 15:40:57 +00:00
2015-05-27 13:08:28 +00:00
2014-04-03 20:17:08 +00:00
2013-04-15 00:28:27 +00:00
2013-04-15 00:28:27 +00:00
2015-11-18 01:28:12 +00:00
2013-07-08 13:17:22 +00:00
2015-03-04 17:07:15 +00:00
2015-01-30 21:28:10 +00:00
2015-11-21 20:23:39 +00:00
2012-10-03 14:31:43 +00:00
2015-04-22 17:48:03 +00:00
2015-04-22 17:48:03 +00:00
2015-11-18 01:28:12 +00:00
2014-11-19 17:23:57 +00:00
2014-11-21 15:17:22 +00:00
2015-05-27 13:08:28 +00:00
2013-08-10 15:29:55 +00:00
2015-12-27 15:40:57 +00:00
2015-11-18 01:28:12 +00:00
2015-11-18 01:28:12 +00:00
2015-04-22 17:48:03 +00:00
2015-11-25 16:40:22 +00:00
2013-05-16 16:02:00 +00:00
2015-04-22 17:48:03 +00:00