fixed a bug in the close() handler

This commit is contained in:
hyung-hwan 2009-08-29 06:47:09 +00:00
parent 9c872e932a
commit c31d8dc8a2
3 changed files with 6 additions and 6 deletions

4
qse/configure vendored
View File

@ -1599,7 +1599,7 @@ Optional Features:
--enable-wchar use wchar_t a default charater type when enabled
(default. yes)
--enable-syscall use the syscall() function to call system calls
(default. yes)
(default. no)
--enable-debug build the library in the debug mode (default. no)
--enable-objc build the library for Objective-C if an Objective-C
compiler is available (default. yes)
@ -25544,7 +25544,7 @@ fi
if test "${enable_syscall+set}" = set; then
enableval=$enable_syscall; enable_syscall_is=$enableval
else
enable_syscall_is=yes
enable_syscall_is=no
fi
if test "${enable_syscall_is}" = "yes"

View File

@ -185,8 +185,8 @@ else
fi
AC_ARG_ENABLE([syscall], [AC_HELP_STRING([--enable-syscall],
[use the syscall() function to call system calls (default. yes)])],
enable_syscall_is=$enableval,enable_syscall_is=yes)
[use the syscall() function to call system calls (default. no)])],
enable_syscall_is=$enableval,enable_syscall_is=no)
if test "${enable_syscall_is}" = "yes"
then
AC_DEFINE([QSE_USE_SYSCALL],[],[use the syscall() function to invoke a system call])

View File

@ -1,5 +1,5 @@
/*
* $Id: fnc.c 271 2009-08-27 12:52:20Z hyunghwan.chung $
* $Id: fnc.c 274 2009-08-28 12:47:09Z hyunghwan.chung $
*
Copyright 2006-2009 Chung, Hyung-Hwan.
@ -240,7 +240,7 @@ static int fnc_close (qse_awk_rtx_t* rtx, const qse_cstr_t* fnm)
QSE_ASSERT (nargs == 1 || nargs == 2);
a0 = qse_awk_rtx_getarg (rtx, 0);
a1 = qse_awk_rtx_getarg (rtx, 1);
if (nargs >= 2) a1 = qse_awk_rtx_getarg (rtx, 1);
QSE_ASSERT (a0 != QSE_NULL);
if (a0->type == QSE_AWK_VAL_STR)