From 146d4a70df9ea6ca264899a5f0c0a5bb3cf7463f Mon Sep 17 00:00:00 2001 From: Jonas Bernoulli Date: Tue, 25 Feb 2020 14:48:04 +0100 Subject: Fix indentation --- scheme/chez/geiser/test.ss | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'scheme/chez/geiser/test.ss') diff --git a/scheme/chez/geiser/test.ss b/scheme/chez/geiser/test.ss index 21f3396..a0259e1 100644 --- a/scheme/chez/geiser/test.ss +++ b/scheme/chez/geiser/test.ss @@ -1,5 +1,5 @@ (import (geiser) - (chezscheme)) + (chezscheme)) (define-syntax assert-equal (syntax-rules () @@ -77,10 +77,10 @@ ;; [(x1 x2 x3) (+ (+ x1 x2) x3)] ;; [(x1 x2 . rest) ;; ((letrec ([loop (lambda (x1 x2 rest) -;; (let ([x (+ x1 x2)]) -;; (if (null? rest) -;; x -;; (loop x (car rest) (cdr rest)))))]) +;; (let ([x (+ x1 x2)]) +;; (if (null? rest) +;; x +;; (loop x (car rest) (cdr rest)))))]) ;; loop) ;; x1 ;; x2 -- cgit v1.2.3