21 lines
295 B
C
21 lines
295 B
C
/*
|
|
* $Id$
|
|
*/
|
|
|
|
#include "hbapi.h"
|
|
#include <time.h>
|
|
|
|
HARBOUR HB_DATETIME( void )
|
|
{
|
|
time_t current_time;
|
|
char * szResult = ( char * ) hb_xgrab( 26 );
|
|
|
|
time( ¤t_time );
|
|
|
|
szResult = strcpy( szResult, ctime( ¤t_time ) );
|
|
|
|
hb_retc( szResult );
|
|
hb_xfree( szResult );
|
|
}
|
|
|