diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2016-11-04 21:53:42 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2016-11-04 21:53:42 -0700 |
| commit | 708a6d5e5fa76d1a5a2d955abfd911af8ff946ac (patch) | |
| tree | 5ab2ca2e54b6e765e643518afe211b2c64c89c0c /gencadr.txr | |
| parent | 3f9bfbb8b93238ee2c828a3bfe4b053e52d23f06 (diff) | |
| download | txr-708a6d5e5fa76d1a5a2d955abfd911af8ff946ac.tar.gz txr-708a6d5e5fa76d1a5a2d955abfd911af8ff946ac.tar.bz2 txr-708a6d5e5fa76d1a5a2d955abfd911af8ff946ac.zip | |
Remove spurious slash in cadr autoload pathname.
* cadr.c: Regenerated.
* gencadr.txr (cadr_register): stdlib_path already
has a slash; we don't have to add one.
Diffstat (limited to 'gencadr.txr')
| -rw-r--r-- | gencadr.txr | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gencadr.txr b/gencadr.txr index 7e96453a..c6b48120 100644 --- a/gencadr.txr +++ b/gencadr.txr @@ -48,7 +48,7 @@ static val cadr_register(val set_fun) @ (repeat) reg_fun(intern(lit("c@{ad}r"), user_package), func_n1(c@{ad}r)); @ (end) - load(format(nil, lit("~a/cadr.tl"), stdlib_path, nao)); + load(format(nil, lit("~acadr.tl"), stdlib_path, nao)); return nil; } |