diff options
| author | Paul A. Patience <paul@apatience.com> | 2021-07-09 21:09:24 -0400 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2021-07-09 23:23:42 -0700 |
| commit | 8d8fee2e506806d9c117b17432ef3a5ec0d6f457 (patch) | |
| tree | 9b4ad67749ed0d022dbb9b4fd9259e7a6440fa93 /lisplib.c | |
| parent | 8e2de972c6935434005575563084195ef67e88e1 (diff) | |
| download | txr-8d8fee2e506806d9c117b17432ef3a5ec0d6f457.tar.gz txr-8d8fee2e506806d9c117b17432ef3a5ec0d6f457.tar.bz2 txr-8d8fee2e506806d9c117b17432ef3a5ec0d6f457.zip | |
compiler: use short-suffix.
* stdlib/compiler.tl (open-compile-streams): Replace usage of
%file-suff-rx% with a call to short-suffix.
Streamline (subjectively) the obtention of ip-nosuff. Replace
calls to ends-with with a casequal on the suffix. Actually make
use of ip-nosuff.
(%file-suff-rx%): Delete (now unused) variable.
Diffstat (limited to 'lisplib.c')
0 files changed, 0 insertions, 0 deletions