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

handling syntactic closures in repl tab completion

Browse source
This commit is contained in:
Alex Shinn 2015-12-23 17:33:36 +09:00
parent b4ab726e8e
commit 82c5035b23
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lib/chibi/repl.scm
View file

@ -76,7 +76,9 @@
(lambda (w) (lambda (w)
(and (>= (string-length w) len) (and (>= (string-length w) len)
(equal? word (substring w 0 len)))) (equal? word (substring w 0 len))))
(map symbol->string (all-exports (interaction-environment))))) (map symbol->string
(map identifier->symbol
(all-exports (interaction-environment))))))
(prefix-len (string-common-prefix-length candidates))) (prefix-len (string-common-prefix-length candidates)))
(if (> prefix-len len) (if (> prefix-len len)
(list (substring (car candidates) 0 prefix-len)) (list (substring (car candidates) 0 prefix-len))