From 41b14f14ea64a46cae2072832ae7eabeb267a831 Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Fri, 5 Jun 2015 01:38:18 -0400 Subject: [PATCH] Bugfix - reverse list --- scheme/base.sld | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scheme/base.sld b/scheme/base.sld index c8238344..3abb98b8 100644 --- a/scheme/base.sld +++ b/scheme/base.sld @@ -174,7 +174,7 @@ (end (if (> (length opts) 1) (cadr opts) len)) (loop (lambda (i lst) (if (= i end) - lst + (reverse lst) (loop (+ i 1) (cons (vector-ref vec i) lst)))))) (loop start '())))