From ee5ebcb9b97b1ff0659098b97227fc7e40f38de7 Mon Sep 17 00:00:00 2001 From: elioat Date: Sat, 3 Dec 2022 15:53:50 -0500 Subject: boring formating --- src/tmp.rkt | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'src') diff --git a/src/tmp.rkt b/src/tmp.rkt index def2ea0..b10d3b1 100644 --- a/src/tmp.rkt +++ b/src/tmp.rkt @@ -34,13 +34,15 @@ (define (inspector1 h) (hash-map h (lambda (k v) - (display (~a "key: " k ", value: " v "\n"))))) + (display (~a " key: " k "\nvalue: " v "\n=====\n")))) + h) (define (inspector2 h) (hash-map h (lambda (k v) (if (hash? v) (~a "value " v " was a hash table!\n") - (display (~a "key: " k ", value: " v "\n")))))) + (display (~a " key: " k "\nvalue: " v "\n=====\n"))))) + h) ; (inspector1 test-data) (inspector2 test-data) \ No newline at end of file -- cgit 1.4.1-2-gfad0