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

fix indentation

Browse source
This commit is contained in:
Alex Shinn 2022-08-03 22:44:28 +09:00
parent a2daa155e8
commit 70acbf5a08
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lib/chibi/snow/commands.scm
View file

@ -1383,8 +1383,9 @@
(chibi (eval '(current-module-path) (environment '(chibi))))
(else (process->sexp
'(chibi-scheme -q -p "(current-module-path)"))))))
(lib-dir (find (lambda (d) (and (equal? (string-ref d 0) #\/)
(string-contains d "/lib")))
(lib-dir (find (lambda (d)
(and (equal? (string-ref d 0) #\/)
(string-contains d "/lib")))
dirs)))
(if lib-dir
(cons lib-dir (delete lib-dir dirs))