From 1663e2784dca658e81f34f89aaf87bb112bcc0bf Mon Sep 17 00:00:00 2001
From: Ben Sima <ben@bsima.me>
Date: Thu, 21 Nov 2019 12:55:05 -0800
Subject: Organize exports and add printf

---
 Com/Simatime/core.scm | 15 ++++++++++++---
 1 file changed, 12 insertions(+), 3 deletions(-)

(limited to 'Com/Simatime')

diff --git a/Com/Simatime/core.scm b/Com/Simatime/core.scm
index a97552f..59288a4 100644
--- a/Com/Simatime/core.scm
+++ b/Com/Simatime/core.scm
@@ -1,12 +1,18 @@
 (define-module (Com Simatime core)
   #:use-module ((ice-9 format))
-  #:export (fmt
+  #:export (
+            ;; simple printing
+            fmt printf pr prn
 
-            first next second
+                ;; navigating data
+            first next second rest
 
+            ;; booleans
             true? false? nil nil?
 
-            comment ))
+            ;; dev helpers
+            comment
+            ))
 
 (define (flip f)           (lambda (x y) (f y x)))
 (define (curry f a)        (lambda (b) (apply f (cons a (list b)))))
@@ -114,6 +120,9 @@
 (define (not-any? pred coll)
   (comp not some))
 
+(define (printf . args)
+  (display (apply format args)))
+
 (define-syntax fmt
   (syntax-rules ()
     ((_ s args ...)
-- 
cgit v1.2.3