core: Remove gc_show.

* mes.c (gc_show): Remove.
This commit is contained in:
Jan Nieuwenhuizen 2016-12-23 17:05:04 +01:00
parent 97dfc3c981
commit 13dd5a1013
1 changed files with 0 additions and 18 deletions

18
mes.c
View File

@ -989,24 +989,6 @@ gc_flip ()
return stack;
}
SCM
gc_show ()
{
fprintf (stderr, "cells: ");
scm *t = g_cells;
display_ (stderr, -1);
fprintf (stderr, "\n");
if (g_news)
{
fprintf (stderr, "news: ");
g_cells = g_news;
display_ (stderr, -1);
fprintf (stderr, "\n");
}
g_cells = t;
return cell_unspecified;
}
// Environment setup
SCM
acons (SCM key, SCM value, SCM alist)