summaryrefslogtreecommitdiffstats
path: root/tests/gpgscm
diff options
context:
space:
mode:
authorJustus Winter <justus@g10code.com>2017-01-31 12:09:42 +0100
committerJustus Winter <justus@g10code.com>2017-01-31 18:49:27 +0100
commit2076cdaf6b93bc73223819895cc7a67323d8cee7 (patch)
treec880945d73ad36da1c0b077f99503d3258610e4a /tests/gpgscm
parentdirmngr: Require --allow-version-check even if --use-tor is used. (diff)
downloadgnupg2-2076cdaf6b93bc73223819895cc7a67323d8cee7.tar.xz
gnupg2-2076cdaf6b93bc73223819895cc7a67323d8cee7.zip
gpgscm: Remove unused functions.
* tests/gpgscm/scheme.c (check_cell_alloced): Remove function. (check_range_alloced): Likewise. Signed-off-by: Justus Winter <justus@g10code.com>
Diffstat (limited to 'tests/gpgscm')
-rw-r--r--tests/gpgscm/scheme.c24
1 files changed, 0 insertions, 24 deletions
diff --git a/tests/gpgscm/scheme.c b/tests/gpgscm/scheme.c
index 86df85101..27beb3a54 100644
--- a/tests/gpgscm/scheme.c
+++ b/tests/gpgscm/scheme.c
@@ -1050,30 +1050,6 @@ static pointer get_vector_object(scheme *sc, int len, pointer init)
return cells;
}
-#if defined TSGRIND
-static void check_cell_alloced(pointer p, int expect_alloced)
-{
- /* Can't use putstr(sc,str) because callers have no access to
- sc. */
- if(typeflag(p) & !expect_alloced)
- {
- fprintf(stderr,"Cell is already allocated!\n");
- }
- if(!(typeflag(p)) & expect_alloced)
- {
- fprintf(stderr,"Cell is not allocated!\n");
- }
-
-}
-static void check_range_alloced(pointer p, int n, int expect_alloced)
-{
- int i;
- for(i = 0;i<n;i++)
- { (void)check_cell_alloced(p+i,expect_alloced); }
-}
-
-#endif
-
/* Medium level cell allocation */
/* get new cons cell */