diff --git a/retropikzel/ctrf.scm b/retropikzel/ctrf.scm
index 0387885..a00058d 100644
--- a/retropikzel/ctrf.scm
+++ b/retropikzel/ctrf.scm
@@ -1,7 +1,8 @@
 (define-syntax ctrf-runner
   (syntax-rules ()
     ((_)
-     (let ((any->string
+     (let ((time-s (lambda () (current-second)))
+           (any->string
              (lambda (any)
                (let ((port (open-output-string)))
                  (display any port)
diff --git a/retropikzel/ctrf.sld b/retropikzel/ctrf.sld
index 8c2a1e2..aa84612 100644
--- a/retropikzel/ctrf.sld
+++ b/retropikzel/ctrf.sld
@@ -36,8 +36,7 @@
     (racket (begin (define implementation-name "racket")))
     (sagittarius (begin (define implementation-name "sagittarius")))
     (skint (begin (define implementation-name "skint")))
-    (stklos (begin (define implementation-name "stklos"))
-            (export ctrf-runner))
+    (stklos (begin (define implementation-name "stklos")))
     (tr7 (begin (define implementation-name "tr7")))
     (ypsilon (begin (define implementation-name "ypsilon")))
     (else (begin (define implementation-name "unknown"))))
diff --git a/retropikzel/ctrf/VERSION b/retropikzel/ctrf/VERSION
index 23aa839..0495c4a 100644
--- a/retropikzel/ctrf/VERSION
+++ b/retropikzel/ctrf/VERSION
@@ -1 +1 @@
-1.2.2
+1.2.3