[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[PATCH] src/eval.c (Fbacktrace): Avoid unnecessary strlen calls
From: |
Lee Duhem |
Subject: |
[PATCH] src/eval.c (Fbacktrace): Avoid unnecessary strlen calls |
Date: |
Tue, 25 Nov 2014 11:47:07 +0800 |
---
src/ChangeLog | 4 ++++
src/eval.c | 8 ++++----
2 files changed, 8 insertions(+), 4 deletions(-)
diff --git a/src/ChangeLog b/src/ChangeLog
index 448de36..c6e3c59 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2014-11-25 Lee Duhem <address@hidden>
+
+ * eval.c(Fbacktrace): Avoid unnecessary strlen calls.
+
2014-11-24 Lars Magne Ingebrigtsen <address@hidden>
* gnutls.c: Fix compilation warnings given fix --enable-gcc-warnings.
diff --git a/src/eval.c b/src/eval.c
index 77b1db9..268472b 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -3315,22 +3315,22 @@ Output stream used is value of `standard-output'. */)
{
Fprin1 (Fcons (backtrace_function (pdl), *backtrace_args (pdl)),
Qnil);
- write_string ("\n", -1);
+ write_string ("\n", 1);
}
else
{
tem = backtrace_function (pdl);
Fprin1 (tem, Qnil); /* This can QUIT. */
- write_string ("(", -1);
+ write_string ("(", 1);
{
ptrdiff_t i;
for (i = 0; i < backtrace_nargs (pdl); i++)
{
- if (i) write_string (" ", -1);
+ if (i) write_string (" ", 1);
Fprin1 (backtrace_args (pdl)[i], Qnil);
}
}
- write_string (")\n", -1);
+ write_string (")\n", 2);
}
pdl = backtrace_next (pdl);
}
--
1.9.3
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [PATCH] src/eval.c (Fbacktrace): Avoid unnecessary strlen calls,
Lee Duhem <=