gpgscm: Improve parsing.
authorJustus Winter <justus@g10code.com>
Tue, 28 Feb 2017 15:19:18 +0000 (16:19 +0100)
committerJustus Winter <justus@g10code.com>
Tue, 28 Feb 2017 15:19:18 +0000 (16:19 +0100)
* tests/gpgscm/scheme.c (port_increment_current_line): Avoid creating
the same integer if the delta is zero.  This happens a lot during
parsing, and puts pressure on the memory allocator.

Signed-off-by: Justus Winter <justus@g10code.com>
tests/gpgscm/scheme.c

index 0453754..b2ff721 100644 (file)
@@ -1735,6 +1735,9 @@ port_clear_location (scheme *sc, port *p)
 static void
 port_increment_current_line (scheme *sc, port *p, long delta)
 {
+  if (delta == 0)
+    return;
+
   p->curr_line =
     mk_integer(sc, ivalue_unchecked(p->curr_line) + delta);
 }