From 217bb7e691856e16f0b7490d6acbf715223b3a13 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Tue, 11 Mar 2025 22:50:05 -0700 Subject: place: fix bad indentation. * stdlib/place.tl (sys:placelet-1): Fix a misindented call-update-expander function call. Also indent its arguments in function style. --- stdlib/place.tl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/stdlib/place.tl b/stdlib/place.tl index 22c3e5b0..ae8b5b5d 100644 --- a/stdlib/place.tl +++ b/stdlib/place.tl @@ -994,10 +994,10 @@ ^(macrolet ((,tmp-getter () ^(,',pl-getter)) (,tmp-setter (val) ^(,',pl-setter ,val))) ,tmp-body))) - (call-update-expander pl-getter pl-setter place env - ^(macrolet ((,tmp-place () ^(,',pl-getter))) - ,(expand ^(symacrolet ((,sym (,tmp-place))) - ,*body) env)))) + (call-update-expander pl-getter pl-setter place env + ^(macrolet ((,tmp-place () ^(,',pl-getter))) + ,(expand ^(symacrolet ((,sym (,tmp-place))) + ,*body) env)))) (remhash *place-update-expander* tmp-place)))) (defmacro placelet* (:form f sym-place-pairs . body) -- cgit v1.2.3