[project @ 2002-04-24 16:01:51 by simonmar]
[packages/random.git] / cbits / timeUtils.c
1 /*
2 * (c) The University of Glasgow 2002
3 *
4 * Time Runtime Support
5 */
6 #include "HsBase.h"
7
8 #if defined(mingw32_TARGET_OS) /* to the end */
9
10 HsAddr __hscore_timezone( void )
11 { return (HsAddr)&_timezone; }
12
13 HsAddr __hscore_tzname( void )
14 { return (HsAddr)_tzname; }
15 #endif