From 852e49c856dbc83458efdca3b0fae27d8ed10730 Mon Sep 17 00:00:00 2001 From: Akshay Date: Thu, 5 Nov 2020 11:55:47 +0530 Subject: rework modules --- util/alist.scm | 4 ++++ util/table.scm | 5 +++++ 2 files changed, 9 insertions(+) (limited to 'util') diff --git a/util/alist.scm b/util/alist.scm index 4e19440..6bc0bda 100644 --- a/util/alist.scm +++ b/util/alist.scm @@ -1,3 +1,7 @@ +(define-module (util/alist) + #: export (lookup-assoc-list + is-elem-assoc-list)) + (define (is-elem-assoc-list key assoc-list) (cond [(null? assoc-list) #f] diff --git a/util/table.scm b/util/table.scm index 7cc68e8..efb9613 100644 --- a/util/table.scm +++ b/util/table.scm @@ -1,3 +1,8 @@ +(define-module (util/table) + #: export (make-table + lookup + table-insert!)) + (define (make-table) (list '*table*)) -- cgit v1.2.3