mirror of
git://git.gnupg.org/gnupg.git
synced 2024-12-22 10:19:57 +01:00
8640fa880d
* tests/gpgscm/Makefile.am (gpgscm_SOURCES): Add new file. * tests/gpgscm/scheme-private.h (struct cell): Move number to the top of the union so that we can initialize it. (struct scheme): Remove 'integer_segment'. * tests/gpgscm/scheme.c (initialize_small_integers): Remove function. (small_integers): New variable. (MAX_SMALL_INTEGER): Compute. (mk_small_integer): Adapt. (mark): Avoid marking objects already marked. This allows us to run the algorithm over objects in the rodata section if they are already marked. (scheme_init_custom_alloc): Remove initialization. (scheme_deinit): Remove deallocation. * tests/gpgscm/small-integers.h: New file. -- Allocate small integers from a fixed pool in the rodata section. This spares us the initialization, and deduplicates integers across different processes. It also makes the integers immutable, increasing memory safety. Signed-off-by: Justus Winter <justus@g10code.com>
62 lines
1.7 KiB
Makefile
62 lines
1.7 KiB
Makefile
# TinyScheme-based test driver.
|
|
#
|
|
# Copyright (C) 2016 g10 Code GmbH
|
|
#
|
|
# This file is part of GnuPG.
|
|
#
|
|
# GnuPG is free software; you can redistribute it and/or modify
|
|
# it under the terms of the GNU General Public License as published by
|
|
# the Free Software Foundation; either version 3 of the License, or
|
|
# (at your option) any later version.
|
|
#
|
|
# GnuPG is distributed in the hope that it will be useful,
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
# GNU General Public License for more details.
|
|
#
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with this program; if not, see <https://www.gnu.org/licenses/>.
|
|
|
|
EXTRA_DIST = \
|
|
LICENSE.TinySCHEME \
|
|
Manual.txt \
|
|
ffi.scm \
|
|
init.scm \
|
|
lib.scm \
|
|
repl.scm \
|
|
t-child.scm \
|
|
tests.scm \
|
|
time.scm
|
|
|
|
AM_CPPFLAGS = -I$(top_srcdir)/common
|
|
include $(top_srcdir)/am/cmacros.am
|
|
|
|
AM_CFLAGS =
|
|
|
|
CLEANFILES =
|
|
|
|
bin_PROGRAMS = gpgscm
|
|
noinst_PROGRAMS = t-child
|
|
|
|
common_libs = ../$(libcommon)
|
|
commonpth_libs = ../$(libcommonpth)
|
|
|
|
gpgscm_CFLAGS = -imacros scheme-config.h \
|
|
$(LIBGCRYPT_CFLAGS) $(LIBASSUAN_CFLAGS) $(GPG_ERROR_CFLAGS)
|
|
gpgscm_SOURCES = main.c private.h ffi.c ffi.h ffi-private.h \
|
|
scheme-config.h scheme.c scheme.h scheme-private.h \
|
|
opdefines.h small-integers.h
|
|
gpgscm_LDADD = $(LDADD) $(common_libs) \
|
|
$(NETLIBS) $(LIBICONV) $(LIBREADLINE) $(LIBINTL) \
|
|
$(LIBGCRYPT_LIBS) $(GPG_ERROR_LIBS)
|
|
|
|
t_child_SOURCES = t-child.c
|
|
|
|
# Make sure that all libs are build before we use them. This is
|
|
# important for things like make -j2.
|
|
$(PROGRAMS): $(common_libs)
|
|
|
|
check-local: gpgscm$(EXEEXT) t-child$(EXEEXT)
|
|
EXEEXT=$(EXEEXT) GPGSCM_PATH=$(srcdir) \
|
|
./gpgscm$(EXEEXT) $(srcdir)/t-child.scm
|