diff options
Diffstat (limited to 'lib/csc/compiler.csc')
| -rw-r--r-- | lib/csc/compiler.csc | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/csc/compiler.csc b/lib/csc/compiler.csc index 20d5d37..7054f10 100644 --- a/lib/csc/compiler.csc +++ b/lib/csc/compiler.csc @@ -1,6 +1,6 @@ (define-library (csc compiler) (export - *library-search-dirs* + add-library-search-dirs compile) (import (scheme base) (only (scheme file) @@ -88,6 +88,10 @@ (define *library-search-dirs* '()) + (define (add-library-search-dirs ds) + (set! *library-search-dirs* (append *library-search-dirs* ds))) + + (define (find-library name) (define library-roots (cons *standard-library-dir* *library-search-dirs*)) (loop for dir in library-roots |