diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2019-08-09 06:36:18 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2019-08-09 06:36:18 -0700 |
commit | 98956bc2a59b989ad775d741604cd0becc5ca0b8 (patch) | |
tree | 6de6cc42a0f75d7314ca8da0b9f95ed4c62e32fd | |
parent | 6ca6b01dca28e81075a2de08369e5db152ce7b10 (diff) | |
download | txr-98956bc2a59b989ad775d741604cd0becc5ca0b8.tar.gz txr-98956bc2a59b989ad775d741604cd0becc5ca0b8.tar.bz2 txr-98956bc2a59b989ad775d741604cd0becc5ca0b8.zip |
reverse: bugfix: garbage object in error message.
* lib.c (reverse): pointer to the C function in is being
used as a value; the correct expression is seq_in.
-rw-r--r-- | lib.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1328,7 +1328,7 @@ val reverse(val seq_in) return obj; } default: - uw_throwf(error_s, lit("reverse: cannot reverse ~s"), in, nao); + uw_throwf(error_s, lit("reverse: cannot reverse ~s"), seq_in, nao); } } |