diff options
-rw-r--r-- | stdlib/load-args.tl | 2 | ||||
-rw-r--r-- | txr.1 | 13 |
2 files changed, 12 insertions, 3 deletions
diff --git a/stdlib/load-args.tl b/stdlib/load-args.tl index 7877f24f..a1c2d7eb 100644 --- a/stdlib/load-args.tl +++ b/stdlib/load-args.tl @@ -41,7 +41,7 @@ `@name.tlo.gz`) lp name lp))) (compile-update-file self)) - [mapdo compile-update-file files]) + (mapdo [orf compile-update-file load] files)) ((:clean) (clean-file (base-name *load-path*)) [mapdo clean-file files]) @@ -81236,10 +81236,19 @@ If there is exactly one argument in the function responds to the following values of that argument: .RS .coIP :compile -The current file in +First, the current file in .code *load-path* -as well as the files passed as arguments, are compiled with +is processed with +.codn compile-update-file . +Then each file in the argument list is also processed with .codn compile-update-file . +Whenever that function returns +.code nil +for any file, that file is loaded with +.codn load . +No additional arguments are passed to this +.code load +invocation. .coIP :clean The current file in .code *load-path* |