11 lines
157 B
Scheme
11 lines
157 B
Scheme
|
|
(library (srfi private include compat)
|
|
|
|
(export search-paths)
|
|
|
|
(import (chezscheme))
|
|
|
|
(define (search-paths)
|
|
(map car (library-directories)))
|
|
|
|
) |