klisp

commit 4b51f0f412c1e7c8420082270997616ed24f4a60
parent 964890a98332fca6bbba757ba0953e1b87dfdddb
Author: Oto Havle <havleoto@gmail.com>
Date:   Tue, 29 Nov 2011 23:08:34 +0100

Fixed defective merge of ksystem.c

Diffstat:
M
src/ksystem.c
 | 
3
++-

1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/src/ksystem.c b/src/ksystem.c
@@ -7,6 +7,7 @@
 #include "kobject.h"
 #include "kstate.h"
 #include "kerror.h"
+#include "kinteger.h"
 #include "ksystem.h"
 
 /* detect platform
@@ -35,6 +36,7 @@
 
 #include <time.h>
 
+/* TEMP for now the best we can do is return the current second */
 TValue ksystem_current_jiffy(klisp_State *K)
 {
     time_t now = time(NULL);
@@ -44,7 +46,6 @@ TValue ksystem_current_jiffy(klisp_State *K)
         return KFALSE;
     } else {
 	return kinteger_new_uint64(K, (uint64_t) now);
-        }
     }
 }