synced with master, new fasl fixed point

owl-lisp · May 9, 2018 · 2856c68 · 2856c68
1 parent 076247d
commit 2856c68
Show file tree

Hide file tree

Showing 3 changed files with 6 additions and 7 deletions.
diff --git a/fasl/init.fasl b/fasl/init.fasl
diff --git a/owl/ol.scm b/owl/ol.scm
@@ -47,7 +47,7 @@
 (define *interactive* #false) ;; be verbose 
 (define *include-dirs* '(".")) ;; now we can (import <libname>) and have them be autoloaded to current repl
 (define *owl-names* #empty)
-(define *owl-version* "0.1.14")
+(define *owl-version* "0.1.15")
 
 (import
    (owl intern)

diff --git a/scheme/time.scm b/scheme/time.scm
@@ -1,8 +1,8 @@
 (define-library (scheme time)
 
    (import
-      (scheme base)
-      (only (owl time) time time-ms))
+      (owl defmac)
+      (owl time))
 
    (export
       current-jiffy
@@ -13,9 +13,8 @@
 
       ;; note: not using clock() and CLOCKS_PER_SEC, because the bytecode must be portable
 
-      (define jiffies-per-second 1000)
-
+      (define (jiffies-per-second) 1000)
       (define current-jiffy time-ms)
 
-      (define current-second time)
-))
+      (define current-second time)))
+