Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-19 05:39:18 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

removing duplicates from repl completion

Browse source
This commit is contained in:
Alex Shinn 2017-10-06 23:23:22 +09:00
parent befd7b5eff
commit 70d61e1fcc
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lib/chibi/repl.scm
View file

@ -53,7 +53,7 @@
(let lp ((env env) (res '())) (let lp ((env env) (res '()))
(if (not env) (if (not env)
res res
(lp (env-parent env) (append (env-exports env) res))))) (lp (env-parent env) (lset-union eq? (env-exports env) res)))))
(define (string-common-prefix-length strings) (define (string-common-prefix-length strings)
(if (null? strings) (if (null? strings)