From 7de03c8ce421e809afb95823037d655aa9a47fd2 Mon Sep 17 00:00:00 2001 From: Arne Babenhauserheide Date: Fri, 18 Aug 2023 19:17:25 +0200 Subject: [PATCH 19/21] SRFI-119 (Wisp): reindent test * test-suite/tests/srfi-119.test (with-read-options, wisp->list): M-x indent-region --- test-suite/tests/srfi-119.test | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/test-suite/tests/srfi-119.test b/test-suite/tests/srfi-119.test index f4a19a0a7..6fe87f2b2 100644 --- a/test-suite/tests/srfi-119.test +++ b/test-suite/tests/srfi-119.test @@ -27,14 +27,14 @@ (define (with-read-options opts thunk) (let ((saved-options (read-options))) (dynamic-wind - (lambda () - (read-options opts)) - thunk - (lambda () - (read-options saved-options))))) + (lambda () + (read-options opts)) + thunk + (lambda () + (read-options saved-options))))) (define (wisp->list str) - (wisp-scheme-read-string str)) + (wisp-scheme-read-string str)) (with-test-prefix "wisp-read-simple" (pass-if (equal? (wisp->list "<= n 5") '((<= n 5)))) -- 2.41.0