From 514d744c40845ab8cb75a4da554e83528edd0f6f Mon Sep 17 00:00:00 2001 From: Antonio Linares Date: Wed, 18 Jul 2001 10:16:59 +0000 Subject: [PATCH] Added Clocks2Secs() function --- harbour/source/rtl/seconds.c | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/harbour/source/rtl/seconds.c b/harbour/source/rtl/seconds.c index 147c454041..75e196069b 100644 --- a/harbour/source/rtl/seconds.c +++ b/harbour/source/rtl/seconds.c @@ -84,3 +84,7 @@ HB_FUNC( SECONDS ) hb_retnd( hb_dateSeconds() ); } +HB_FUNC( CLOCKS2SECS ) +{ + hb_retnl( hb_parnl( 1 ) / CLOCKS_PER_SEC ); +} \ No newline at end of file