diff options
author | EuAndreh <eu@euandre.org> | 2022-03-20 01:45:01 -0300 |
---|---|---|
committer | EuAndreh <eu@euandre.org> | 2022-03-20 01:45:01 -0300 |
commit | 347ca6eaa5aa2932ab1defc196b9fff1ac934ed7 (patch) | |
tree | b61acff08324616e722d80edd1027a3054c961b8 | |
parent | TODOs.md: Add #td-0f8c386f-ea4c-900d-35e7-dbead75d9d90 (diff) | |
download | server-347ca6eaa5aa2932ab1defc196b9fff1ac934ed7.tar.gz server-347ca6eaa5aa2932ab1defc196b9fff1ac934ed7.tar.xz |
src/lib/curth0.scm: Re-export "first" and "second" functions
-rw-r--r-- | src/lib/curth0.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/lib/curth0.scm b/src/lib/curth0.scm index c56263f..5d73160 100644 --- a/src/lib/curth0.scm +++ b/src/lib/curth0.scm @@ -2,9 +2,13 @@ #:use-module ((language tree-il) #:prefix tree-il:) #:use-module ((ice-9 pretty-print) #:prefix pp:) #:use-module ((srfi srfi-1) #:prefix s1:) + #:use-module ((srfi srfi-1) #:select (first second)) #:use-module ((srfi srfi-64) #:prefix t:) #:export (-> - ->>)) + ->> + tap) + #:re-export (first + second)) (define (tap x) (pp:pretty-print x) |