diff options
Diffstat (limited to 'src/interp/lisplib.boot')
-rw-r--r-- | src/interp/lisplib.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/lisplib.boot b/src/interp/lisplib.boot index 9fd15b53..d06478fe 100644 --- a/src/interp/lisplib.boot +++ b/src/interp/lisplib.boot @@ -49,7 +49,7 @@ readLib(fn,ft) == readLib1(fn,ft,"*") readLib1(fn,ft,fm) == -- see if it exists first - p := pathname [fn,ft,fm] + p := pathname [fn,ft,fm] or return nil readLibPathFast p readLibPathFast p == @@ -94,7 +94,7 @@ getLisplibNoCache(name,id) == getFileProperty(fn,ft,id,cache) == fn in '(DOMAIN SUBDOM MODE) => nil - p := pathname [fn,ft,'"*"] + p := pathname [fn,ft,'"*"] or return nil cache => hasFileProperty(p,id,fn) hasFilePropertyNoCache(p,id,fn) |