diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix for older compilers

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1593 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
rslopes 2006-04-11 16:49:07 +00:00
parent 13479f6091
commit e2b10fe908
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
library/yap2swi/yap2swi.c
View File

@ -1323,6 +1323,9 @@ X_API int Sdprintf(char *format,...)
static int
SWI_ctime(void)
{
#if HAVE_CTIME
time_t tim;
#endif
YAP_Term t1 = YAP_ARG1;
if (YAP_IsVarTerm(t1)) {
@ -1330,7 +1333,7 @@ SWI_ctime(void)
return FALSE;
}
#if HAVE_CTIME
time_t tim = (time_t)YAP_IntOfTerm(t1);
tim = (time_t)YAP_IntOfTerm(t1);
return YAP_Unify(YAP_BufferToString(ctime(&tim)), YAP_ARG2);
#else
YAP_Error(0,0L,"convert_time requires ctime");