diff --git a/lib/scheme/time/tai-to-utc-offset.sld b/lib/scheme/time/tai-to-utc-offset.sld
index f63a0114..39242b26 100644
--- a/lib/scheme/time/tai-to-utc-offset.sld
+++ b/lib/scheme/time/tai-to-utc-offset.sld
@@ -16,7 +16,14 @@
   (import (scheme read))
   (import (scheme process-context))
   
-  (import (srfi 18))
+  (cond-expand
+   (threads
+    (import (srfi 18)))
+   (else
+    (begin
+      (define (make-thread thunk) #f)
+      (define (thread-start! th) #f)
+      (define (thread-sleep! secs) #f))))
   
   (cond-expand
    (chibi