summaryrefslogtreecommitdiff
path: root/libguile/stime.c
diff options
context:
space:
mode:
authorMarius Vollmer <mvo@zagadka.de>2005-11-06 22:12:04 +0000
committerMarius Vollmer <mvo@zagadka.de>2005-11-06 22:12:04 +0000
commit9291479faa3965f39324e3d3f5453c951c0691c9 (patch)
treed70b6fab1980e90b4b5d1d13bfff5cc64fcdea32 /libguile/stime.c
parent914da0e2fce5d0f062d43131270849f2adcb642f (diff)
downloadguile-9291479faa3965f39324e3d3f5453c951c0691c9.tar.gz
(scm_mktime): Use scm_frame_critical_section instead of
SCM_CRITICAL_SECTION_START/END since the code inside the critical section might exit non-locally.
Diffstat (limited to 'libguile/stime.c')
-rw-r--r--libguile/stime.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/stime.c b/libguile/stime.c
index 36d34d450..591b20c8c 100644
--- a/libguile/stime.c
+++ b/libguile/stime.c
@@ -532,7 +532,8 @@ SCM_DEFINE (scm_mktime, "mktime", 1, 1, 0,
scm_frame_free ((char *)lt.tm_zone);
#endif
- SCM_CRITICAL_SECTION_START;
+ scm_frame_critical_section (SCM_BOOL_F);
+
oldenv = setzone (zone, SCM_ARG2, FUNC_NAME);
#ifdef LOCALTIME_CACHE
tzset ();
@@ -585,7 +586,6 @@ SCM_DEFINE (scm_mktime, "mktime", 1, 1, 0,
result = scm_cons (scm_from_long (itime),
filltime (&lt, zoff, zname));
- SCM_CRITICAL_SECTION_END;
if (zname)
free (zname);