From 8d4413a1856b5e6d3906a3a078997e71e1de9b68 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Juan=20Manuel=20Tom=C3=A1s?= <jtomas1815@gmail.com>
Date: Fri, 4 Nov 2022 01:50:46 -0300
Subject: Add hash table printer (not recursive)

---
 print.lisp | 6 ++++++
 1 file changed, 6 insertions(+)
 create mode 100644 print.lisp

(limited to 'print.lisp')

diff --git a/print.lisp b/print.lisp
new file mode 100644
index 0000000..ed02b1c
--- /dev/null
+++ b/print.lisp
@@ -0,0 +1,6 @@
+(in-package #:print)
+
+(defun table (tbl)
+  (maphash (lambda (k v)
+             (format t "Key: ~a, Value: ~a" k v))
+           tbl))
-- 
cgit v1.2.3